Merging Smart-seq2 and 10X Datasets
Gametocyte Development in Plasmodium berghei
Andrew Russell
September 17, 2020
1. Introduction and Aims
We have quality-controlled the 10X data and the SS2 data and now are left with the following objects:
10X 5K data - pb_sex_filtered
10X 30K data - pb_30k_sex_filtered
SS2 mutant data - ss2_mutants_final
2. Read in the data
Load/Install the Required Packages
[1] "patchwork is loaded correctly"
[1] "viridis is loaded correctly"
[1] "Seurat is loaded correctly"
[1] "cowplot is loaded correctly"
[1] "gridExtra is loaded correctly"
[1] "grid is loaded correctly"
[1] "Hmisc is loaded correctly"
[1] "reshape2 is loaded correctly"
[1] "dplyr is loaded correctly"Read in the Data
screen hits
## EDIT - change this to the excel table once we have it finalised for the screen
screen_hits <- c("PBANKA-0516300",
"PBANKA-1217700",
"PBANKA-0409100",
"PBANKA-1034300",
"PBANKA-1437500",
"PBANKA-0827500",
"PBANKA-0824300",
"PBANKA-1426900",
"PBANKA-0105300",
"PBANKA-0921100",
"PBANKA-1002400",
"PBANKA-0829400",
"PBANKA-1347200",
"PBANKA-0828000",
"PBANKA-0902300",
"PBANKA-1418100",
"PBANKA-1435200",
"PBANKA-1454800",
"PBANKA-0712300",
"PBANKA-0410500",
"PBANKA-1144800",
"PBANKA-1231600",
"PBANKA-0503200",
"PBANKA-0308900",
"PBANKA-1214700",
"PBANKA-0709900",
"PBANKA-0311900",
"PBANKA-0716500",
"PBANKA-1447900",
"PBANKA-0102200",
"PBANKA-0713500",
"PBANKA-0102400",
"PBANKA-1302700",
"PBANKA-1235900",
"PBANKA-0401100",
"PBANKA-0413400",
"PBANKA-1126900",
"PBANKA-1425900",
"PBANKA-0418300",
"PBANKA-1464600",
"PBANKA-0806000")load in datasets
## load the 10X dataset
pb_sex_filtered <- readRDS("../data_to_export/pb_sex_filtered.RDS")
#pb_sex_filtered <- readRDS("/Users/Andy/pb_sex_filtered.RDS")
pb_sex_filtered <- readRDS("../data_to_export/pb_sex_filtered.RDS")
## load the SS2 dataset
ss2_mutants_final <- readRDS("../data_to_export/ss2_mutants_final.RDS")
## inspect
paste("10x dataset")[1] "10x dataset"pb_sex_filteredAn object of class Seurat
5098 features across 6191 samples within 1 assay
Active assay: RNA (5098 features, 2000 variable features)
2 dimensional reductions calculated: pca, umappaste("Smart-seq2 dataset")[1] "Smart-seq2 dataset"ss2_mutants_finalAn object of class Seurat
5245 features across 2970 samples within 1 assay
Active assay: RNA (5245 features, 2000 variable features)
2 dimensional reductions calculated: pca, umappaste("The composition of the Smart-seq2 dataset is:")[1] "The composition of the Smart-seq2 dataset is:"table(ss2_mutants_final@meta.data$genotype)
Mutant WT
2281 689 3. Merging the Smart-seq2 and 10X Data
Prepare data
## extract 10x data
tenx_5k_counts <- as.matrix(pb_sex_filtered@assays$RNA@counts)
tenx_5k_pheno <- pb_sex_filtered@meta.data
## Create fresh object
tenx_5k_counts_to_integrate <- CreateSeuratObject(counts = tenx_5k_counts, meta.data = tenx_5k_pheno, min.cells = 0, min.features = 0, project = "GCSKO")
## add experiment meta data
tenx_5k_counts_to_integrate@meta.data$experiment <- "tenx_5k"
## inspect
tenx_5k_counts_to_integrateAn object of class Seurat
5098 features across 6191 samples within 1 assay
Active assay: RNA (5098 features, 0 variable features)We need to make sure the mutant data is compatible with the 10X data. the 10X data has fewer genes represented so we need to find the intersect of the two before integration.
## extract SS2 data
mutant_counts_for_integration <- as.matrix(ss2_mutants_final@assays$RNA@counts)
mutant_pheno_for_integration <- ss2_mutants_final@meta.data
## change counts so the :rRNA and :tRNA are not there:
rownames(mutant_counts_for_integration) <- gsub(":ncRNA", "", gsub(":rRNA", "", gsub(":tRNA", "", rownames(mutant_counts_for_integration))))
## change the gene names so that they are - rather than _:
rownames(mutant_counts_for_integration) <- gsub("_", "-", rownames(mutant_counts_for_integration))
## calculate how many of the genes overlap - 10x does start out with 5098 vs 5245
genes_in_tenx_dataset <- intersect(rownames(tenx_5k_counts), rownames(mutant_counts_for_integration))
## print number of genes that overlap
dim(mutant_counts_for_integration)[1] 5245 2970## subset the mutant counts to contain only 10x genes
mutant_counts_for_integration <- mutant_counts_for_integration[which(rownames(mutant_counts_for_integration) %in% genes_in_tenx_dataset), ]
## print result of genes that overlap
dim(mutant_counts_for_integration)[1] 5018 2970## make Seurat object:
GCSKO_mutants <- CreateSeuratObject(counts = mutant_counts_for_integration, meta.data = mutant_pheno_for_integration, min.cells = 0, min.features = 0, project = "GCSKO")
## add experiment meta data
GCSKO_mutants@meta.data$experiment <- "mutants"
## inspect
GCSKO_mutantsAn object of class Seurat
5018 features across 2970 samples within 1 assay
Active assay: RNA (5018 features, 0 variable features)## double check that this is the same number of genes
## subset counts so that only genes represented in the other two objects are there:
length(intersect(rownames(tenx_5k_counts), rownames(mutant_counts_for_integration)))[1] 5018create list and normalise:
## make list
tenx.mutant.list <- list(tenx_5k_counts_to_integrate, GCSKO_mutants)
## prepare data
for (i in 1:length(tenx.mutant.list)) {
tenx.mutant.list[[i]] <- NormalizeData(tenx.mutant.list[[i]], verbose = FALSE)
tenx.mutant.list[[i]] <- FindVariableFeatures(tenx.mutant.list[[i]], selection.method = "vst",
nfeatures = 2000, verbose = FALSE)
}Integrate objects
## Find anchors
tenx.mutant.anchors <- FindIntegrationAnchors(object.list = tenx.mutant.list, dims = 1:21, verbose = FALSE)## Integrate data
tenx.mutant.integrated <- IntegrateData(anchorset = tenx.mutant.anchors, dims = 1:21, verbose = FALSE, features.to.integrate = genes_in_tenx_dataset)Adding a command log without an assay associated with it4. Dimensionality reduction
PCA
## Make the default assay integrated
DefaultAssay(tenx.mutant.integrated) <- "integrated"
## Run the standard workflow for visualization and clustering
tenx.mutant.integrated <- ScaleData(tenx.mutant.integrated, verbose = FALSE)
tenx.mutant.integrated <- RunPCA(tenx.mutant.integrated, npcs = 30, verbose = FALSE)
## inspect PCs
ElbowPlot(tenx.mutant.integrated, ndims = 30, reduction = "pca")
UMAP
Initial UMAP
Run inital UMAP
## Run UMAP
tenx.mutant.integrated <- RunUMAP(tenx.mutant.integrated, reduction = "pca", dims = 1:8, n.neighbors = 50, seed.use = 1234, min.dist = 0.5, repulsion.strength = 0.05)15:40:41 UMAP embedding parameters a = 0.583 b = 1.334
Found more than one class "dist" in cache; using the first, from namespace 'spam'
Also defined by ‘BiocGenerics’
15:40:41 Read 9161 rows and found 8 numeric columns
15:40:41 Using Annoy for neighbor search, n_neighbors = 50
Found more than one class "dist" in cache; using the first, from namespace 'spam'
Also defined by ‘BiocGenerics’
15:40:41 Building Annoy index with metric = cosine, n_trees = 50
0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|
15:40:44 Writing NN index file to temp file /var/folders/wj/rztzclxn1t10cl2sk0plbf3r0000gn/T//RtmpXGhNV1/file43372b7bbd87
15:40:44 Searching Annoy index using 1 thread, search_k = 5000
15:40:49 Annoy recall = 100%
15:40:50 Commencing smooth kNN distance calibration using 1 thread
15:40:52 Initializing from normalized Laplacian + noise
15:40:54 Commencing optimization for 500 epochs, with 599738 positive edges
0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|
15:41:09 Optimization finishedSee distribution by: altogether, experiment, and mutant ID
## Plot
DimPlot(tenx.mutant.integrated, reduction = "umap", pt.size = 0.01)
DimPlot(tenx.mutant.integrated, reduction = "umap", split.by = "experiment", pt.size = 0.01)
DimPlot(tenx.mutant.integrated, reduction = "umap", group.by = "identity_updated", label = TRUE, repel = TRUE, pt.size = 0.01)
Optimised UMAP
After optimisation, the following UMAP can be calculated:
## Run optimised UMAP
tenx.mutant.integrated <- RunUMAP(tenx.mutant.integrated, reduction = "pca", dims = 1:10, n.neighbors = 150, seed.use = 1234, min.dist = 0.4, repulsion.strength = 0.03, local.connectivity = 150)15:41:13 UMAP embedding parameters a = 0.7669 b = 1.223
Found more than one class "dist" in cache; using the first, from namespace 'spam'
Also defined by ‘BiocGenerics’
15:41:13 Read 9161 rows and found 10 numeric columns
15:41:13 Using Annoy for neighbor search, n_neighbors = 150
Found more than one class "dist" in cache; using the first, from namespace 'spam'
Also defined by ‘BiocGenerics’
15:41:13 Building Annoy index with metric = cosine, n_trees = 50
0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|
15:41:15 Writing NN index file to temp file /var/folders/wj/rztzclxn1t10cl2sk0plbf3r0000gn/T//RtmpXGhNV1/file433748d8005e
15:41:15 Searching Annoy index using 1 thread, search_k = 15000
15:41:27 Annoy recall = 100%
15:41:28 Commencing smooth kNN distance calibration using 1 thread
15:41:28 9161 smooth knn distance failures
15:41:32 Initializing from normalized Laplacian + noise
15:41:34 Commencing optimization for 500 epochs, with 1845842 positive edges
0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|
15:46:23 Optimization finished## plot
dp1 <- DimPlot(tenx.mutant.integrated, label = TRUE, repel = FALSE, pt.size = 0.05, dims = c(2,1), group.by = "experiment") +
## fix the axis
coord_fixed() +
## reverse the scale
scale_x_reverse()
## view
dp1
Now store these reversed embeddings in a new slot
## extract the cell embeddings from the UMAP
mds <- as.data.frame(tenx.mutant.integrated@reductions$umap@cell.embeddings)
## change the coordinates of UMAP 2 so they are reversed
mds$UMAP_2 <- -mds$UMAP_2
## change names of the cols
colnames(mds) <- paste0("DIM_UMAP_", 1:2)
## make into a matrix so that it can be saved in Seurat
mds <- as.matrix(mds)
## store this optimsed UMAP in a custom dim slot
tenx.mutant.integrated[["DIM_UMAP"]] <- CreateDimReducObject(embeddings = mds, key = "DIM_UMAP_", assay = DefaultAssay(tenx.mutant.integrated))Keys should be one or more alphanumeric characters followed by an underscore, setting key from DIM_UMAP_ to DIMUMAP_All keys should be one or more alphanumeric characters followed by an underscore '_', setting key to DIMUMAP_## check
DimPlot(tenx.mutant.integrated, label = TRUE, repel = FALSE, pt.size = 0.05, dims = c(2,1), reduction = "DIM_UMAP") + coord_fixed()
5. Clustering
Generate clusters
Recluster dataset now that it is integrated. We will cluster with a number of resolutions to begin with to see how this affects the number and nature of the clusters.
## copy old clusters
tenx.mutant.integrated <- AddMetaData(tenx.mutant.integrated, tenx.mutant.integrated@meta.data$RNA_snn_res.1, col.name = "pre_integration_clusters")
## generate new clusters at low resolution
## 1
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:15)Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 1, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 327141
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.8681
Number of communities: 20
Elapsed time: 1 seconds## generate new clusters at low resolution
## 1.2
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:15)Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 1.2, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 327141
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.8542
Number of communities: 22
Elapsed time: 1 seconds## generate new clusters at low resolution
## 1.5
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:15)Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 1.5, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 327141
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.8366
Number of communities: 25
Elapsed time: 1 seconds## generate new clusters at mid resolution
## 2
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:15)Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 2, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 327141
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.8125
Number of communities: 31
Elapsed time: 1 seconds## generate new clusters at high resolution
## 4
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:15)Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 4, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 327141
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.7435
Number of communities: 45
Elapsed time: 1 seconds## print identities
#head(Idents(tenx.mutant.integrated), 10)Inspect clusters at different resolutions
resolution = 1
View
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, dims = c(2,1), reduction = "DIM_UMAP", group.by = "integrated_snn_res.1") + coord_fixed() 
Make individual plots highlighting where cells in each cluster fall
plot
## this function writes the next bit of code for you
## put it into the console and paste the response
#ploty <- c()
#for(i in seq_along(levels(tenx.mutant.integrated@meta.data$seurat_clusters))){
# ploty <- paste0(ploty, "list_UMAPs_by_cluster[[", i, "]]", " + ")
#}
## plot
list_UMAPs_by_cluster[[1]] + list_UMAPs_by_cluster[[2]] + list_UMAPs_by_cluster[[3]] + list_UMAPs_by_cluster[[4]] + list_UMAPs_by_cluster[[5]] + list_UMAPs_by_cluster[[6]] + list_UMAPs_by_cluster[[7]] + list_UMAPs_by_cluster[[8]] + list_UMAPs_by_cluster[[9]] + list_UMAPs_by_cluster[[10]] + list_UMAPs_by_cluster[[11]] + list_UMAPs_by_cluster[[12]] + list_UMAPs_by_cluster[[13]] + list_UMAPs_by_cluster[[14]] + list_UMAPs_by_cluster[[15]] + list_UMAPs_by_cluster[[16]] + list_UMAPs_by_cluster[[17]] + list_UMAPs_by_cluster[[18]] + list_UMAPs_by_cluster[[19]] + list_UMAPs_by_cluster[[20]]
resolution = 1.2
View
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, dims = c(2,1), reduction = "DIM_UMAP", group.by = "integrated_snn_res.1.2") + coord_fixed() 
Make individual plots highlighting where cells in each cluster fall
plot
## this function writes the next bit of code for you
## put it into the console and paste the response
#ploty <- c()
#for(i in seq_along(levels(tenx.mutant.integrated@meta.data$seurat_clusters))){
# ploty <- paste0(ploty, "list_UMAPs_by_cluster[[", i, "]]", " + ")
#}
## plot
list_UMAPs_by_cluster[[1]] + list_UMAPs_by_cluster[[2]] + list_UMAPs_by_cluster[[3]] + list_UMAPs_by_cluster[[4]] + list_UMAPs_by_cluster[[5]] + list_UMAPs_by_cluster[[6]] + list_UMAPs_by_cluster[[7]] + list_UMAPs_by_cluster[[8]] + list_UMAPs_by_cluster[[9]] + list_UMAPs_by_cluster[[10]] + list_UMAPs_by_cluster[[11]] + list_UMAPs_by_cluster[[12]] + list_UMAPs_by_cluster[[13]] + list_UMAPs_by_cluster[[14]] + list_UMAPs_by_cluster[[15]] + list_UMAPs_by_cluster[[16]] + list_UMAPs_by_cluster[[17]] + list_UMAPs_by_cluster[[18]] + list_UMAPs_by_cluster[[19]] + list_UMAPs_by_cluster[[20]] + list_UMAPs_by_cluster[[21]] + list_UMAPs_by_cluster[[22]]
resolution = 1.5
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, dims = c(2,1), reduction = "DIM_UMAP", group.by = "integrated_snn_res.1.5") + coord_fixed() 
Make individual plots highlighting where cells in each cluster fall
## 1.5 resolution
list_UMAPs_by_cluster[[1]] + list_UMAPs_by_cluster[[2]] + list_UMAPs_by_cluster[[3]] + list_UMAPs_by_cluster[[4]] + list_UMAPs_by_cluster[[5]] + list_UMAPs_by_cluster[[6]] + list_UMAPs_by_cluster[[7]] + list_UMAPs_by_cluster[[8]] + list_UMAPs_by_cluster[[9]] + list_UMAPs_by_cluster[[10]] + list_UMAPs_by_cluster[[11]] + list_UMAPs_by_cluster[[12]] + list_UMAPs_by_cluster[[13]] + list_UMAPs_by_cluster[[14]] + list_UMAPs_by_cluster[[15]] + list_UMAPs_by_cluster[[16]] + list_UMAPs_by_cluster[[17]] + list_UMAPs_by_cluster[[18]] + list_UMAPs_by_cluster[[19]] + list_UMAPs_by_cluster[[20]] + list_UMAPs_by_cluster[[21]] + list_UMAPs_by_cluster[[22]] + list_UMAPs_by_cluster[[23]] + list_UMAPs_by_cluster[[24]] + list_UMAPs_by_cluster[[25]]
resolution = 2
View
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, dims = c(2,1), reduction = "DIM_UMAP", group.by = "integrated_snn_res.2") + coord_fixed() 
Make individual plots highlighting where cells in each cluster fall
plot
## this function writes the next bit of code for you
## put it into the console and paste the response
#ploty <- c()
#for(i in seq_along(levels(tenx.mutant.integrated@meta.data$seurat_clusters))){
# ploty <- paste0(ploty, "list_UMAPs_by_cluster[[", i, "]]", " + ")
#}
## plot
list_UMAPs_by_cluster[[1]] + list_UMAPs_by_cluster[[2]] + list_UMAPs_by_cluster[[3]] + list_UMAPs_by_cluster[[4]] + list_UMAPs_by_cluster[[5]] + list_UMAPs_by_cluster[[6]] + list_UMAPs_by_cluster[[7]] + list_UMAPs_by_cluster[[8]] + list_UMAPs_by_cluster[[9]] + list_UMAPs_by_cluster[[10]] + list_UMAPs_by_cluster[[11]] + list_UMAPs_by_cluster[[12]] + list_UMAPs_by_cluster[[13]] + list_UMAPs_by_cluster[[14]] + list_UMAPs_by_cluster[[15]] + list_UMAPs_by_cluster[[16]] + list_UMAPs_by_cluster[[17]] + list_UMAPs_by_cluster[[18]] + list_UMAPs_by_cluster[[19]] + list_UMAPs_by_cluster[[20]] + list_UMAPs_by_cluster[[21]] + list_UMAPs_by_cluster[[22]] + list_UMAPs_by_cluster[[23]] + list_UMAPs_by_cluster[[24]] + list_UMAPs_by_cluster[[25]] + list_UMAPs_by_cluster[[26]] + list_UMAPs_by_cluster[[27]] + list_UMAPs_by_cluster[[28]] + list_UMAPs_by_cluster[[29]] + list_UMAPs_by_cluster[[30]] + list_UMAPs_by_cluster[[31]]
3 vs 19 on resolution 2 already looks pretty cool:
## reset the default identity
## generate new clusters at mid resolution
## 2
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:15)Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 2, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 327141
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.8125
Number of communities: 31
Elapsed time: 1 seconds## Find deferentially expressed features between the two clusters
early.sex.de.markers <- FindMarkers(tenx.mutant.integrated, ident.1 = "5", ident.2 = "3")
| | 0 % ~calculating
|+ | 1 % ~17s
|++ | 2 % ~17s
|++ | 3 % ~17s
|+++ | 4 % ~16s
|+++ | 5 % ~16s
|++++ | 6 % ~15s
|++++ | 7 % ~15s
|+++++ | 8 % ~14s
|+++++ | 9 % ~13s
|++++++ | 10% ~13s
|++++++ | 11% ~12s
|+++++++ | 12% ~12s
|+++++++ | 13% ~11s
|++++++++ | 14% ~11s
|++++++++ | 15% ~10s
|+++++++++ | 16% ~10s
|+++++++++ | 17% ~10s
|++++++++++ | 18% ~10s
|++++++++++ | 19% ~10s
|+++++++++++ | 20% ~09s
|+++++++++++ | 21% ~09s
|++++++++++++ | 22% ~09s
|++++++++++++ | 23% ~09s
|+++++++++++++ | 24% ~08s
|+++++++++++++ | 26% ~08s
|++++++++++++++ | 27% ~08s
|++++++++++++++ | 28% ~08s
|+++++++++++++++ | 29% ~08s
|+++++++++++++++ | 30% ~08s
|++++++++++++++++ | 31% ~08s
|++++++++++++++++ | 32% ~08s
|+++++++++++++++++ | 33% ~07s
|+++++++++++++++++ | 34% ~07s
|++++++++++++++++++ | 35% ~07s
|++++++++++++++++++ | 36% ~07s
|+++++++++++++++++++ | 37% ~07s
|+++++++++++++++++++ | 38% ~07s
|++++++++++++++++++++ | 39% ~07s
|++++++++++++++++++++ | 40% ~07s
|+++++++++++++++++++++ | 41% ~07s
|+++++++++++++++++++++ | 42% ~07s
|++++++++++++++++++++++ | 43% ~06s
|++++++++++++++++++++++ | 44% ~06s
|+++++++++++++++++++++++ | 45% ~06s
|+++++++++++++++++++++++ | 46% ~06s
|++++++++++++++++++++++++ | 47% ~06s
|++++++++++++++++++++++++ | 48% ~06s
|+++++++++++++++++++++++++ | 49% ~06s
|+++++++++++++++++++++++++ | 50% ~06s
|++++++++++++++++++++++++++ | 51% ~05s
|+++++++++++++++++++++++++++ | 52% ~05s
|+++++++++++++++++++++++++++ | 53% ~05s
|++++++++++++++++++++++++++++ | 54% ~05s
|++++++++++++++++++++++++++++ | 55% ~05s
|+++++++++++++++++++++++++++++ | 56% ~05s
|+++++++++++++++++++++++++++++ | 57% ~05s
|++++++++++++++++++++++++++++++ | 58% ~04s
|++++++++++++++++++++++++++++++ | 59% ~04s
|+++++++++++++++++++++++++++++++ | 60% ~04s
|+++++++++++++++++++++++++++++++ | 61% ~04s
|++++++++++++++++++++++++++++++++ | 62% ~04s
|++++++++++++++++++++++++++++++++ | 63% ~04s
|+++++++++++++++++++++++++++++++++ | 64% ~04s
|+++++++++++++++++++++++++++++++++ | 65% ~04s
|++++++++++++++++++++++++++++++++++ | 66% ~04s
|++++++++++++++++++++++++++++++++++ | 67% ~04s
|+++++++++++++++++++++++++++++++++++ | 68% ~03s
|+++++++++++++++++++++++++++++++++++ | 69% ~03s
|++++++++++++++++++++++++++++++++++++ | 70% ~03s
|++++++++++++++++++++++++++++++++++++ | 71% ~03s
|+++++++++++++++++++++++++++++++++++++ | 72% ~03s
|+++++++++++++++++++++++++++++++++++++ | 73% ~03s
|++++++++++++++++++++++++++++++++++++++ | 74% ~03s
|++++++++++++++++++++++++++++++++++++++ | 76% ~03s
|+++++++++++++++++++++++++++++++++++++++ | 77% ~03s
|+++++++++++++++++++++++++++++++++++++++ | 78% ~02s
|++++++++++++++++++++++++++++++++++++++++ | 79% ~02s
|++++++++++++++++++++++++++++++++++++++++ | 80% ~02s
|+++++++++++++++++++++++++++++++++++++++++ | 81% ~02s
|+++++++++++++++++++++++++++++++++++++++++ | 82% ~02s
|++++++++++++++++++++++++++++++++++++++++++ | 83% ~02s
|++++++++++++++++++++++++++++++++++++++++++ | 84% ~02s
|+++++++++++++++++++++++++++++++++++++++++++ | 85% ~02s
|+++++++++++++++++++++++++++++++++++++++++++ | 86% ~02s
|++++++++++++++++++++++++++++++++++++++++++++ | 87% ~01s
|++++++++++++++++++++++++++++++++++++++++++++ | 88% ~01s
|+++++++++++++++++++++++++++++++++++++++++++++ | 89% ~01s
|+++++++++++++++++++++++++++++++++++++++++++++ | 90% ~01s
|++++++++++++++++++++++++++++++++++++++++++++++ | 91% ~01s
|++++++++++++++++++++++++++++++++++++++++++++++ | 92% ~01s
|+++++++++++++++++++++++++++++++++++++++++++++++ | 93% ~01s
|+++++++++++++++++++++++++++++++++++++++++++++++ | 94% ~01s
|++++++++++++++++++++++++++++++++++++++++++++++++ | 95% ~01s
|++++++++++++++++++++++++++++++++++++++++++++++++ | 96% ~00s
|+++++++++++++++++++++++++++++++++++++++++++++++++ | 97% ~00s
|+++++++++++++++++++++++++++++++++++++++++++++++++ | 98% ~00s
|++++++++++++++++++++++++++++++++++++++++++++++++++| 99% ~00s
|++++++++++++++++++++++++++++++++++++++++++++++++++| 100% elapsed=11s # view results
head(early.sex.de.markers)look at them across the dataset
DotPlot(tenx.mutant.integrated, features = c(rownames(early.sex.de.markers[1:10,]), "PBANKA-1302700")) + RotatedAxis()
DotPlot(tenx.mutant.integrated, features = screen_hits) + RotatedAxis()
## find all markers
#all.markers <- FindAllMarkers(tenx.mutant.integrated, only.pos = FALSE, min.pct = 0.25, logfc.threshold = 0.25)#top_two <- all.markers %>% group_by(cluster) %>% top_n(n = 2, wt = avg_logFC)
top_tworesolution = 4
View
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, dims = c(2,1), reduction = "DIM_UMAP", group.by = "integrated_snn_res.4") + coord_fixed() 
Make individual plots highlighting where cells in each cluster fall
plot
## this function writes the next bit of code for you
## put it into the console and paste the response
#ploty <- c()
#for(i in seq_along(levels(tenx.mutant.integrated@meta.data$seurat_clusters))){
# ploty <- paste0(ploty, "list_UMAPs_by_cluster[[", i, "]]", " + ")
#}
## plot
list_UMAPs_by_cluster[[1]] + list_UMAPs_by_cluster[[2]] + list_UMAPs_by_cluster[[3]] + list_UMAPs_by_cluster[[4]] + list_UMAPs_by_cluster[[5]] + list_UMAPs_by_cluster[[6]] + list_UMAPs_by_cluster[[7]] + list_UMAPs_by_cluster[[8]] + list_UMAPs_by_cluster[[9]] + list_UMAPs_by_cluster[[10]] + list_UMAPs_by_cluster[[11]] + list_UMAPs_by_cluster[[12]] + list_UMAPs_by_cluster[[13]] + list_UMAPs_by_cluster[[14]] + list_UMAPs_by_cluster[[15]] + list_UMAPs_by_cluster[[16]] + list_UMAPs_by_cluster[[17]] + list_UMAPs_by_cluster[[18]] + list_UMAPs_by_cluster[[19]] + list_UMAPs_by_cluster[[20]] + list_UMAPs_by_cluster[[21]] + list_UMAPs_by_cluster[[22]] + list_UMAPs_by_cluster[[23]] + list_UMAPs_by_cluster[[24]] + list_UMAPs_by_cluster[[25]] + list_UMAPs_by_cluster[[26]] + list_UMAPs_by_cluster[[27]] + list_UMAPs_by_cluster[[28]] + list_UMAPs_by_cluster[[29]] + list_UMAPs_by_cluster[[30]] + list_UMAPs_by_cluster[[31]] + list_UMAPs_by_cluster[[32]] + list_UMAPs_by_cluster[[33]] + list_UMAPs_by_cluster[[34]] + list_UMAPs_by_cluster[[35]] + list_UMAPs_by_cluster[[36]] + list_UMAPs_by_cluster[[37]] + list_UMAPs_by_cluster[[38]] + list_UMAPs_by_cluster[[39]] + list_UMAPs_by_cluster[[40]] + list_UMAPs_by_cluster[[41]] + list_UMAPs_by_cluster[[42]] + list_UMAPs_by_cluster[[43]] + list_UMAPs_by_cluster[[44]] + list_UMAPs_by_cluster[[45]]
UMAP clustering
## run a new UMAP with
tenx.mutant.integrated <- RunUMAP(tenx.mutant.integrated, reduction = "pca", dims = 1:10, n.components = 10)15:48:24 UMAP embedding parameters a = 0.9922 b = 1.112
Found more than one class "dist" in cache; using the first, from namespace 'spam'
Also defined by ‘BiocGenerics’
15:48:24 Read 9161 rows and found 10 numeric columns
15:48:24 Using Annoy for neighbor search, n_neighbors = 30
Found more than one class "dist" in cache; using the first, from namespace 'spam'
Also defined by ‘BiocGenerics’
15:48:24 Building Annoy index with metric = cosine, n_trees = 50
0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|
15:48:27 Writing NN index file to temp file /var/folders/wj/rztzclxn1t10cl2sk0plbf3r0000gn/T//RtmpXGhNV1/file43371993ff23
15:48:27 Searching Annoy index using 1 thread, search_k = 3000
15:48:30 Annoy recall = 100%
15:48:32 Commencing smooth kNN distance calibration using 1 thread
15:48:35 Initializing from normalized Laplacian + noise
15:48:35 Commencing optimization for 500 epochs, with 374688 positive edges
0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|
15:48:57 Optimization finished## generate new clusters at low resolution
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:10, reduction = "umap")Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 0.5, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 217927
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.9507
Number of communities: 26
Elapsed time: 0 seconds[1] 26plot
## this function writes the next bit of code for you
## put it into the console and paste the response
#ploty <- c()
#for(i in seq_along(levels(tenx.mutant.integrated@meta.data$seurat_clusters))){
# ploty <- paste0(ploty, "list_UMAPs_by_cluster[[", i, "]]", " + ")
#}
## plot
list_UMAPs_by_cluster[[1]] + list_UMAPs_by_cluster[[2]] + list_UMAPs_by_cluster[[3]] + list_UMAPs_by_cluster[[4]] + list_UMAPs_by_cluster[[5]] + list_UMAPs_by_cluster[[6]] + list_UMAPs_by_cluster[[7]] + list_UMAPs_by_cluster[[8]] + list_UMAPs_by_cluster[[9]] + list_UMAPs_by_cluster[[10]] + list_UMAPs_by_cluster[[11]] + list_UMAPs_by_cluster[[12]] + list_UMAPs_by_cluster[[13]] + list_UMAPs_by_cluster[[14]] + list_UMAPs_by_cluster[[15]] + list_UMAPs_by_cluster[[16]] + list_UMAPs_by_cluster[[17]] + list_UMAPs_by_cluster[[18]] + list_UMAPs_by_cluster[[19]] + list_UMAPs_by_cluster[[20]] + list_UMAPs_by_cluster[[21]] + list_UMAPs_by_cluster[[22]] + list_UMAPs_by_cluster[[23]] + list_UMAPs_by_cluster[[24]] + list_UMAPs_by_cluster[[25]] + list_UMAPs_by_cluster[[26]]
Pick final resolution
We will look in more detail at cells as they enter the sexual trajecotry later. The PCA clustering will be more appropriate in this high-resolution view. In order to subset these cells, we will use the UMAP clustering.
## generate final clusters which will be written into the 'seurat.clusters' slot in meta data
tenx.mutant.integrated <- FindNeighbors(tenx.mutant.integrated, dims = 1:10, reduction = "umap")Computing nearest neighbor graph
Computing SNNtenx.mutant.integrated <- FindClusters(tenx.mutant.integrated, resolution = 0.5, random.seed = 42, algorithm = 2)Modularity Optimizer version 1.3.0 by Ludo Waltman and Nees Jan van Eck
Number of nodes: 9161
Number of edges: 217927
Running Louvain algorithm with multilevel refinement...0% 10 20 30 40 50 60 70 80 90 100%
[----|----|----|----|----|----|----|----|----|----|
**************************************************|Maximum modularity in 10 random starts: 0.9507
Number of communities: 26
Elapsed time: 0 seconds## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, group.by = "seurat_clusters", dims = c(2,1), reduction = "DIM_UMAP") + coord_fixed()
clusters metrics
We will get some high level insight into these clusters now
v1 <- VlnPlot(object = tenx.mutant.integrated, features = "nFeature_RNA", group.by = "seurat_clusters", pt.size = 0.01)
v2 <- VlnPlot(object = tenx.mutant.integrated, features = "nCount_RNA", group.by = "seurat_clusters", pt.size = 0.01)
v1 + v2
6. Define Cluster Identities
We have defined clusters, now we will identify what the clusters correspond to. We can use a number of external datasets to do this:
known marker genes
bulk RNA-seq data correlation
Marker gene expression
expression of 820 markers
## make plots
plots <- FeaturePlot(tenx.mutant.integrated, features = c("PBANKA-1319500", "PBANKA-0416100"), blend = TRUE, combine = FALSE, coord.fixed = TRUE, dims = c(2,1), reduction = "DIM_UMAP")
# Get just the co-expression plot, built-in legend is meaningless for this plot
#plots[[3]] + NoLegend()
# Get just the key
#plots[[4]]
# Stitch the co-expression and key plots together
plots[[3]] + NoLegend() + plots[[4]]/plot_spacer() + plot_layout(widths = c(2,1))
Known Marker Genes Plots
marker genes plots
## find a good ring marker, to see if there is a better one than the ones reported
#markers_ring <- FindMarkers(tenx.mutant.integrated, ident.1 = c("4", "5", "16", "11", "7", "3", "9", "0", "22"))
#head(markers_ring)
# PBANKA-1319500 - CCP2 - female - used in 820 line
# PBANKA-0416100 - MG1 - dynenin heavy chain - male - used in 820 line
# PBANKA-1437500 - AP2G - commitment
# PBANKA-0831000 - MSP1 - late asexual
# PBANKA-1102200 - MSP8 - early asexual (from Bozdech paper)
# PBANKA-0711900 - HSP70 - promoter used for GFP and RFP expression in the mutants
# PBANKA-1400400 - FAMB - ring marker - discovered by looking for marker genes in data
# PBANKA-0722600 - Fam-b2 - ring marker - https://www.ncbi.nlm.nih.gov/pmc/articles/PMC5113031/
marker_gene_plot_CCP2 <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-1319500", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("CCP2 (Female)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_MG1 <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-0416100", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("MG1 (Male)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_AP2G <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-1437500", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("AP2G (Commitment)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_MSP1 <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-0831000", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("MSP1 (Schizont)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_MSP8 <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-1102200", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("MSP8 (Asexual)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_SBP1 <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-1101300", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("SBP1 (Ring)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_FAMB <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-0722600", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("Fam-b2 (Ring)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_HSP70 <- FeaturePlot(tenx.mutant.integrated, features = "PBANKA-0711900", coord.fixed = TRUE, min.cutoff = "q1", dims = c(2,1), reduction = "DIM_UMAP", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("(HSP70; Reporter)","\n", "PBANKA_0711900")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30)))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.##original label:
# labs(title = paste("(CCP2; Female)","\n", "PBANKA_1319500"))
## plot
marker_gene_plot_FAMB + marker_gene_plot_MSP8 + marker_gene_plot_MSP1 + marker_gene_plot_AP2G + marker_gene_plot_CCP2 + marker_gene_plot_MG1 + marker_gene_plot_HSP70
Then define each cluster as Male, Female or Asexual:
## copy clusters to new column
tenx.mutant.integrated@meta.data$cluster_colours_figure <- NA
## define which clusters will be which identity
male_clusters <- c("20", "17", "8", "18")
female_clusters <- c("23", "19", "21", "5")
asex_clusters <- c("6", "4", "9", "2", "1", "7", "0", "3", "12", "16", "10", "11", "24", "14", "15", "22", "25")
bipotential_clusters <- c("13")
## check length of the unique entries in the manualy created list above and the number of clusters in total
paste("Is the total number of clusters in the list the same as the number of clusters in the slot?", identical(length(unique(c(male_clusters, female_clusters, asex_clusters, bipotential_clusters))), length(levels(tenx.mutant.integrated@meta.data$seurat_clusters))))[1] "Is the total number of clusters in the list the same as the number of clusters in the slot? TRUE"## change the column IDs
tenx.mutant.integrated@meta.data$cluster_colours_figure[which(tenx.mutant.integrated@meta.data$seurat_clusters %in% male_clusters)] <- "Male"
tenx.mutant.integrated@meta.data$cluster_colours_figure[which(tenx.mutant.integrated@meta.data$seurat_clusters %in% female_clusters)] <- "Female"
tenx.mutant.integrated@meta.data$cluster_colours_figure[which(tenx.mutant.integrated@meta.data$seurat_clusters %in% asex_clusters)] <- "Asexual"
tenx.mutant.integrated@meta.data$cluster_colours_figure[which(tenx.mutant.integrated@meta.data$seurat_clusters %in% bipotential_clusters)] <- "Bipotential"
table(tenx.mutant.integrated@meta.data$cluster_colours_figure)
Asexual Bipotential Female Male
7008 222 1044 887 7. Plot Figures
useful tools for all plots
## define male and female symbol
female_symbol <- intToUtf8(9792)
male_symbol <- intToUtf8(9794)Fig. 3.A. (All Cells by Male, Female, Male)
save
ggsave("../images_to_export/merge_UMAP_identity.png", plot = UMAP_identity, device = "png", path = NULL, scale = 1, width = 20, height = 20, units = "cm", dpi = 300, limitsize = TRUE)Fig. Sup. UMAP with Clusters
## Plot
umap_cluster <- DimPlot(tenx.mutant.integrated, label = TRUE, label.size = 8, repel = FALSE, pt.size = 0.5, dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
theme(legend.position="bottom",
axis.line=element_blank(),
axis.text.x=element_blank(),
axis.text.y=element_blank(),
axis.ticks=element_blank(),
axis.title.x=element_blank(),
axis.title.y=element_blank()) +
guides(colour=guide_legend(nrow = 3, byrow = TRUE, override.aes = list(size=5)))
## print
umap_cluster
save
ggsave("../images_to_export/merge_UMAP_cluster.png", plot = umap_cluster, device = "png", path = NULL, scale = 1, width = 20, height = 20, units = "cm", dpi = 300, limitsize = TRUE)Fig. 3.C. By bulk correlation
## make plots
## hoo dataset correlation
UMAP_hoo <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, group.by = "Prediction.Spearman.", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
theme_void() +
labs(title = paste("Hoo Predicted Timepoint")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_manual(values = inferno(12)) +
labs(colour = "hour") +
theme(legend.position = "bottom", legend.title=element_text(size=10))
## ap2g timecourse in this paper correlation
UMAP_kasia <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, group.by = "Prediction.Spearman._Kasia", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
theme_void() +
labs(title = paste("AP2G Timecourse Predicted Timepoint")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_manual(values = inferno(10)) +
labs(colour = "hour") +
theme(legend.position = "bottom", legend.title=element_text(size=10))
## combine
umap_bulk <- wrap_plots(UMAP_hoo, UMAP_kasia, ncol = 2)
## print
umap_bulk
ggsave("../images_to_export/merge_umap_bulk_prediction.png", plot = umap_bulk, device = "png", path = NULL, scale = 1, width = 30, height = 10, units = "cm", dpi = 300, limitsize = TRUE)Fig. 3.C. By Experiment
The original method of plotting by experiment does not allow much customisation of the plots. I.e. we cannot easily change the titles of each plot
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.5, split.by = "experiment", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
theme(legend.position="bottom", axis.line=element_blank(),axis.text.x=element_blank(),
axis.text.y=element_blank(),axis.ticks=element_blank(),
axis.title.x=element_blank(),
axis.title.y=element_blank())
But, we can use the following code to do this
## make an extra meta.data column so you can split the object by SS2 mutant, SS2 WT, 10X
## make new column in meta.data
tenx.mutant.integrated@meta.data$sub_genotype <- tenx.mutant.integrated@meta.data$genotype
## replace NA values from 10X data with a value
tenx.mutant.integrated@meta.data$sub_genotype[is.na(tenx.mutant.integrated@meta.data$sub_genotype)] <- "10X_WT"
## check
table(tenx.mutant.integrated@meta.data$sub_genotype)
10X_WT Mutant WT
6191 2281 689 ## split seurat object up
ob.list <- SplitObject(tenx.mutant.integrated, split.by = "sub_genotype")
## make plots for each object
plot.list <- lapply(X = ob.list, FUN = function(x) {
DimPlot(x, dims = c(2,1), reduction = "DIM_UMAP", label = FALSE, label.size = 5, repel = TRUE, pt.size = 1) + theme(legend.position="bottom")
})
## use this function to extract legend:
## source: https://stackoverflow.com/questions/13649473/add-a-common-legend-for-combined-ggplots
## source: https://github.com/hadley/ggplot2/wiki/Share-a-legend-between-two-ggplot2-graphs
g_legend<-function(a.gplot){
tmp <- ggplot_gtable(ggplot_build(a.gplot))
leg <- which(sapply(tmp$grobs, function(x) x$name) == "guide-box")
legend <- tmp$grobs[[leg]]
return(legend)}
## make plots pretty
p1 <- plot.list$`10X_WT` + theme_void() + guides(colour=guide_legend(nrow=2,byrow=TRUE, override.aes = list(size=4)))
p2 <- plot.list$WT + theme_void()
p3 <- plot.list$Mutant + theme_void()
## get legend
mylegend<-g_legend(p1)
## make a final plot
p4 <- grid.arrange(arrangeGrob(p1 + theme(legend.position="none") + labs(title = paste("10X", "\n", "(wild-type)")) + theme(plot.title = element_text(hjust = 0.5)),
p2 + theme(legend.position="none") + labs(title = paste("Smart-seq2", "\n", "(wild-type)")) + theme(plot.title = element_text(hjust = 0.5)),
p3 + theme(legend.position="none") + labs(title = paste("Smart-seq2", "\n", "(mutant)")) + theme(plot.title = element_text(hjust = 0.5)), nrow=1),
mylegend, nrow=2,heights=c(10, 1))
Make final plots:
p1 <- plot.list$`10X_WT` +
coord_fixed() +
theme_void() +
scale_color_manual(values=c(replicate(45, "#999999"))) +
labs(title = paste("10X (wild-type)")) +
theme(legend.position = "none", plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold"))
p2 <- plot.list$WT +
coord_fixed() +
theme_void() +
scale_color_manual(values=c(replicate(46, "#999999"))) +
labs(title = paste("Smart-seq2 (wild-type)")) +
theme(legend.position = "none", plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold"))
p3 <- plot.list$Mutant +
coord_fixed() +
theme_void() +
scale_color_manual(values=c(replicate(46, "#999999"))) +
labs(title = paste("Smart-seq2 (mutant)")) +
theme(legend.position = "none", plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold"))
p1 + p2 + p3
## make composite plot
UMAP_composite <- wrap_plots(marker_gene_plot_FAMB , marker_gene_plot_MSP8 , marker_gene_plot_MSP1 , marker_gene_plot_AP2G , marker_gene_plot_CCP2 , marker_gene_plot_MG1 , p1 , p2 , p3, ncol = 3)
## print
UMAP_composite
save
ggsave("../images_to_export/merge_umap_technology_and_markers.png", plot = UMAP_composite, device = "png", path = NULL, scale = 1, width = 30, height = 30, units = "cm", dpi = 300, limitsize = TRUE)Specific gene expression of mutants
# PBANKA-1418100 GCSKO-17 FD3
# PBANKA-0102400 GCSKO-2 MD3
# PBANKA-0716500 GCSKO-19 MD4
# PBANKA-1435200 GCSKO-20 FD4
# PBANKA-0902300 GCSKO-13 FD2
# PBANKA-0413400 GCSKO-10_820 MD5
# PBANKA-0828000 GCSKO-3 GD1
# PBANKA-1302700 GCSKO-oom MD1
# PBANKA-1447900 GCSKO-29 MD2
# PBANKA-1454800 GCSKO-21 FD1
# PBANKA-1144800 GCSKO-28 FD5
marker_gene_plot_17 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-1418100", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("17")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_2 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-0102400", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("2")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_19 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-0716500", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("19")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_20 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-1435200", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("20")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_13 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-0902300", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("13")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_10 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-0413400", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("10")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_3 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-0828000", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("3")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_oom <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-1302700", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("oom")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_29 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-1447900", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("29")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_21 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-1454800", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("21")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.marker_gene_plot_28 <- FeaturePlot(tenx.mutant.integrated, dims = c(2,1), reduction = "DIM_UMAP", features = "PBANKA-1144800", coord.fixed = TRUE, min.cutoff = "q10", max.cutoff = "q95", pt.size = 1, order = TRUE) +
theme_void() +
labs(title = paste("28")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 20, face = "bold")) +
scale_colour_gradientn(colours=c("#DCDCDC", plasma(30))) +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.##original label:
# labs(title = paste("(CCP2; Female)","\n", "PBANKA_1319500"))
## make composite plot
mutant_expression_composite <- wrap_plots(marker_gene_plot_17 , marker_gene_plot_2 , marker_gene_plot_19 , marker_gene_plot_20 , marker_gene_plot_13 , marker_gene_plot_10 , marker_gene_plot_3 , marker_gene_plot_oom , marker_gene_plot_29 , marker_gene_plot_21 , marker_gene_plot_28, ncol = 4)
## print
mutant_expression_composite
save
ggsave("../images_to_export/merge_umap_mutant_gene_expression.png", plot = mutant_expression_composite, device = "png", path = NULL, scale = 1, width = 30, height = 30, units = "cm", dpi = 300, limitsize = TRUE)Fig. Sup. Look at specific mutants
All the mutant genotypes profiled were:
## make a list of possible genotypes
unique(tenx.mutant.integrated@meta.data$identity_updated) [1] NA "GCSKO-oom" "WT" "GCSKO-29"
[5] "GCSKO-21" "GCSKO-28" "GCSKO-17" "GCSKO-2"
[9] "GCSKO-19" "GCSKO-20" "GCSKO-13" "GCSKO-10_820"
[13] "GCSKO-3" ## ~ TODO ~ MAKE INTO A FOR LOOP
## make lists for each genotype
cells_17 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-17"), ])
cells_2 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-2"), ])
cells_19 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-19"), ])
cells_20 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-20"), ])
cells_13 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-13"), ])
cells_10 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-10_820"), ])
cells_3 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-3"), ])
cells_oom <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-oom"), ])
cells_29 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-29"), ])
cells_21 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-21"), ])
cells_28 <- rownames(tenx.mutant.integrated@meta.data[which(tenx.mutant.integrated@meta.data$identity_updated == "GCSKO-28"), ])
## make plots
pm1 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_28, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 28","\n", "(PBANKA_1144800)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm2 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_17, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 17","\n", "(PBANKA_1418100)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm3 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_2, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 2","\n", "(PBANKA_0102400)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm4 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_19, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 19","\n", "(PBANKA_0716500)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm5 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_20, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 20","\n", "(PBANKA_1435200)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm6 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_13, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 13","\n", "PBANKA_0902300")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm7 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_10, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 10","\n", "(PBANKA_0413400)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm8 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_3, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 3","\n", "(PBANKA_0828000)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm9 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_oom, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant oom","\n", "(PBANKA_1302700)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm10 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_29, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 29","\n", "(PBANKA_1447900)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.pm11 <- DimPlot(tenx.mutant.integrated, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = cells_21, group.by = "exclude_for_sex_ratio", dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
labs(title = paste("Mutant 21","\n", "(PBANKA_1454800)")) +
theme(plot.title = element_text(hjust = 0.5, family="Arial", size = 15, face = "bold"), legend.position = "none") +
## add sex symbols
annotate("text", x = 3.8, y = 1.5, label = male_symbol, size=7, color="gray") +
annotate("text", x = 2, y = 2.8, label = female_symbol, size=7, color="gray")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.## plot composite plot
## not used as outside plots have odd sizes
#pm1 + pm2 + pm4 + pm5 + pm11 + pm7 + pm6 + pm8 + pm9 + pm10 + pm3
## plot composite plot
mutant_cell_locations <- plot_grid(pm1 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm2 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm4 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm5 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm11 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm7 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm6 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm8 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm9 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm10 + theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), pm3+ theme(plot.margin = unit(c(0, 0, 0, 0), "cm")), nrow = 3)
## print
mutant_cell_locations
save
ggsave("/Users/Andy/GCSKO/GCSKO_analysis_git/images_to_export/merge_umap_mutant_cell_locations.png", plot = mutant_cell_locations, device = "png", path = NULL, scale = 1, width = 30, height = 30, units = "cm", dpi = 300, limitsize = TRUE)Figure. Sup. Dot Plot Figures
Expression of Marker Genes by Cluster
We will use the following marker genes:
# PBANKA-1319500 - CCP2 - female - used in 820 line
# PBANKA-0416100 - MG1 - dynenin heavy chain - male - used in 820 line
# PBANKA-0831000 - MSP1 - late asexual
# PBANKA-1102200 - MSP8 - early asexual (from Bozdech paper)
# PBANKA-1437500 - AP2G - commitmentplot expression of these marker genes in each cluster
## copy the clusters so you don't permanently edit the master
tenx.mutant.integrated@meta.data$seurat_clusters_plotting <- tenx.mutant.integrated@meta.data$seurat_clusters
## reorder the levels so you can plot the cluters as you wish
my_levels <- c(asex_clusters, bipotential_clusters, male_clusters, female_clusters)
## reorder the levels
tenx.mutant.integrated@meta.data$seurat_clusters_plotting <- factor(x = tenx.mutant.integrated@meta.data$seurat_clusters_plotting, levels = my_levels)
## plot
dot_plot_markers <- DotPlot(tenx.mutant.integrated, features = c("PBANKA-1319500", "PBANKA-0416100", "PBANKA-1437500", "PBANKA-0831000", "PBANKA-1102200"), group.by = "seurat_clusters_plotting") +
theme_classic() +
# change appearance and remove axis elements, and make room for arrows
theme(axis.text.x = element_text(size=16, angle = 45, hjust=1,vjust=1, family = "Arial"), text=element_text(size=16, family="Arial"), legend.position = "bottom", legend.direction = "horizontal", legend.box = "vertical", plot.title = element_blank(), plot.margin = unit(c(1,3,1,3), "lines")) +
#change the colours
scale_colour_viridis(option = "inferno", guide = "colourbar", na.value="white", begin = 0, end = 1, direction = 1) +
## change x axis label
labs(x = "Marker Genes", y = "Cluster", title = "Expression of Marker Genes by Cluster") +
## add arrows
#annotate("segment", x = 5.5, xend = 5.5, y = 21.5, yend = 25, colour = "green", size=1, alpha=1, arrow=arrow(length=unit(0.30,"cm"), type = "closed")) +
#annotate("segment", x = 5.5, xend = 5.5, y = 16.5, yend = 21.5, colour = "red", size=1, alpha=1, arrow=arrow(length=unit(0.30,"cm"), type = "closed")) +
#annotate("segment", x = 5.5, xend = 5.5, y = 0, yend = 15.5, colour = "grey", size=1, alpha=1, arrow=arrow(length=unit(0.30,"cm"), type = "closed")) +
## annotate males
geom_hline(aes(yintercept = 28.5)) +
## annotate females
geom_hline(aes(yintercept = 24.5)) +
## annotate hermaphrodite
geom_hline(aes(yintercept = 23.5)) +
## change label on bottom of plot so we can indicate markers
scale_x_discrete(labels = c(paste("PBANKA-1102200","\n", "(MSP8; early asexual)"), paste("PBANKA-0831000","\n", "(MSP1; late asexual)"), paste("PBANKA-1437500", "\n", "(AP2G; sexual commitment)"), paste("PBANKA-0416100", "\n", "(MG1; male)"), paste("PBANKA-1319500", "\n", "(CCP2; female)")))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.## view
print(dot_plot_markers)
Expression of the mutant genes by cluster
gene identities for the mutants profiled
# GCSKO-3 PBANKA_0828000
# GCSKO-oom PBANKA_1302700
# GCSKO-29 PBANKA_1447900
# GCSKO-2 PBANKA_0102400
# GCSKO-19 PBANKA_0716500
# GCSKO-20 PBANKA_1435200
# GCSKO-17 PBANKA_1418100
# GCSKO-28 PBANKA_1144800
# GCSKO-13 PBANKA_0902300
# GCSKO-10_820 PBANKA_0413400_820
# GCSKO-21 PBANKA_1454800plot expression of these mutant genes by cluster
## plot
dot_plot_mutant_genes <- DotPlot(tenx.mutant.integrated, features = c("PBANKA-0828000", "PBANKA-1302700", "PBANKA-1447900", "PBANKA-0102400", "PBANKA-0716500", "PBANKA-1435200", "PBANKA-1418100", "PBANKA-1144800", "PBANKA-0902300", "PBANKA-0413400", "PBANKA-1454800"), group.by = "seurat_clusters_plotting") +
theme_classic() +
## change appearance and remove axis elements, and make room for arrows, and also change posoition of legends relative to one another
theme(axis.text.x = element_text(size=12, angle = 45, hjust=1,vjust=1), legend.position = "bottom", legend.direction = "horizontal", legend.box = "vertical", plot.margin = unit(c(1,3,1,3), "lines"), text=element_text(size=16, family="Arial")) +
##add these to above to remove y = plot.title = element_blank(), axis.text.y = element_blank(), axis.ticks.y = element_blank(), axis.title.y = element_blank()
## change the colours
scale_colour_viridis(option = "inferno", guide = "colourbar", na.value="white", begin = 0, end = 1, direction = 1) +
## change x axis label
labs(x = "Mutant Genes", title = "Expression of mutant genes by cluster", y = "Cluster") +
## annotate males
geom_hline(aes(yintercept = 28.5)) +
## annotate females
geom_hline(aes(yintercept = 24.5)) +
## annotate hermaphrodite
geom_hline(aes(yintercept = 23.5)) +
## change label on bottom of plot so we can indicate markers
scale_x_discrete(labels = c(paste("PBANKA_1454800","\n", "(GCSKO 21)"),
paste("PBANKA-0413400","\n", "(GCSKO 10)"),
paste("PBANKA-0902300", "\n", "(GCSKO 13)"),
paste("PBANKA-1144800", "\n", "(GCSKO 28)"),
paste("PBANKA-1418100", "\n", "(GCSKO 17)"),
paste("PBANKA-1435200", "\n", "(GCSKO 20)"),
paste("PBANKA-0716500", "\n", "(GCSKO 19)"),
paste("PBANKA-0102400", "\n", "(GCSKO 2)"),
paste("PBANKA-1447900", "\n", "(GCSKO 29)"),
paste("PBANKA-1302700", "\n", "(GCSKO oom)"),
paste("PBANKA-0828000", "\n", "(GCSKO 3)")))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.## view
print(dot_plot_mutant_genes)
Representation of Experiment by Cluster
make a metadata column where the 10X data is classified as a WT genotype
## get cells that are filtered out
cells_10x <- which(tenx.mutant.integrated@meta.data$experiment == "tenx_5k")
## make extra column in plotting df
tenx.mutant.integrated@meta.data$genotype_combined <- tenx.mutant.integrated@meta.data$genotype
tenx.mutant.integrated@meta.data$genotype_combined[cells_10x] <- "WT"
## inspect
table(tenx.mutant.integrated@meta.data$genotype_combined)
Mutant WT
2281 6880 Plot expression of mutant genes by cluster (which is subdivided by genotype)
This is kind of a control because the mutant should express less of the gene of interest at some point due to the inclusion of the mutant cells
## plot
dot_plot_mutant_genes_genotype <- DotPlot(tenx.mutant.integrated, features = c("PBANKA-0828000", "PBANKA-1302700", "PBANKA-1447900", "PBANKA-0102400", "PBANKA-0716500", "PBANKA-1435200", "PBANKA-1418100", "PBANKA-1144800", "PBANKA-0902300", "PBANKA-0413400", "PBANKA-1454800"), group.by = "seurat_clusters_plotting", split.by = "genotype_combined") +
## make appearance smoother
theme_classic() +
## change appearance and remove axis elements, and make room for arrows
theme(axis.text.x = element_text(size=12, angle = 45, hjust=1,vjust=1), legend.position = "bottom", plot.title = element_blank(), plot.margin = unit(c(1,3,1,1), "lines")) +
## change the colours
#scale_colour_viridis(option = "inferno", guide = "colourbar", na.value="white", begin = 0, end = 1, direction = 1) +
## change x axis label
labs(x = "Marker Genes") +
## annotate males
geom_hline(aes(yintercept = 56.5)) +
## annotate females
geom_hline(aes(yintercept = 48.5)) +
## annotate hermaphrodite
geom_hline(aes(yintercept = 46.5))
## change label on bottom of plot so we can indicate markers
#scale_x_discrete(labels = c(paste("PBANKA-1102200","\n", "(MSP8; early asexual)"), paste("PBANKA-0831000","\n", "(MSP1; late asexual)"), paste("PBANKA-1437500", "\n", "(AP2G; sexual commitment)"), paste("PBANKA-0416100", "\n", "(MG1; male)"), paste("PBANKA-1319500", "\n", "(CCP2; female)")))
## view
print(dot_plot_mutant_genes_genotype)
## plot
dot_plot_mutants_experiment <- DotPlot(tenx.mutant.integrated, features = c("PBANKA-0828000", "PBANKA-1302700", "PBANKA-1447900", "PBANKA-0102400", "PBANKA-0716500", "PBANKA-1435200", "PBANKA-1418100", "PBANKA-1144800", "PBANKA-0902300", "PBANKA-0413400", "PBANKA-1454800"), group.by = "seurat_clusters_plotting", split.by = "sub_genotype", cols = c("red", "blue", "green")) +
theme_classic() +
# change appearance and remove axis elements, and make room for arrows
theme(axis.text.x = element_text(size=12, angle = 45, hjust=1,vjust=1), legend.position = "bottom", plot.title = element_blank(), plot.margin = unit(c(1,3,1,1), "lines")) +
#change the colours
#scale_colour_viridis(option = "inferno", guide = "colourbar", na.value="white", begin = 0, end = 1, direction = 1) +
## change x axis label
labs(x = "Marker Genes") +
## annotate males
geom_hline(aes(yintercept = 77)) +
## annotate females
geom_hline(aes(yintercept = 61)) +
## annotate hermaphrodite
geom_hline(aes(yintercept = 59))
## change label on bottom of plot so we can indicate markers
#scale_x_discrete(labels = c(paste("PBANKA-1102200","\n", "(MSP8; early asexual)"), paste("PBANKA-0831000","\n", "(MSP1; late asexual)"), paste("PBANKA-1437500", "\n", "(AP2G; sexual commitment)"), paste("PBANKA-0416100", "\n", "(MG1; male)"), paste("PBANKA-1319500", "\n", "(CCP2; female)")))
## view
print(dot_plot_mutants_experiment)
Representation of mutants in markers
Add a meta.data column so that 10X is listed as WT:
## get cells that are filtered out
mutant_cells <- which(tenx.mutant.integrated$experiment == "mutants")
## make extra column in plotting df
tenx.mutant.integrated@meta.data$identity_combined <- "WT_10X"
tenx.mutant.integrated@meta.data$identity_combined[mutant_cells] <- tenx.mutant.integrated@meta.data$identity_updated[mutant_cells]prepare data for dotplotting
## make a dataframe that is a copy of the meta data
df_meta_data <- as.data.frame(tenx.mutant.integrated@meta.data)
## redefine order of clusters:
df_meta_data$seurat_clusters <- factor(x = df_meta_data$seurat_clusters, levels = my_levels)
## make a new df of CLUSTER and IDENTITY
dot_plot_df <- as.data.frame.matrix(table(df_meta_data$seurat_clusters, df_meta_data$identity_combined))
dot_plot_df$cluster <- rownames(dot_plot_df)
## calculate percentage of cells for each genotype
dot_plot_df_pc <- (as.data.frame.matrix(prop.table(table(df_meta_data$seurat_clusters, df_meta_data$identity_combined), margin = 2)) * 100)
## make a column for cluster names
dot_plot_df_pc$cluster <- rownames(dot_plot_df_pc)
## melt dataframe for plotting
library(reshape2)
dot_plot_df_pc_melted <- melt(dot_plot_df_pc, variable.name = "cluster")Using cluster as id variablescolnames(dot_plot_df_pc_melted)[2] <- "identity"
## melt the raw number too
dot_plot_df_melted <- melt(dot_plot_df, variable.name = "cluster")Using cluster as id variablescolnames(dot_plot_df_melted)[2] <- "identity"
colnames(dot_plot_df_melted)[3] <- "raw_number"
## merge together
identical(dot_plot_df_melted$cluster, dot_plot_df_pc_melted$cluster)[1] TRUEdot_plot_merged <- cbind(dot_plot_df_melted, dot_plot_df_pc_melted)
dot_plot_merged <- dot_plot_merged[,c(1,2,3,6)]
## redefine order of clusters
dot_plot_merged$cluster <- factor(x = dot_plot_merged$cluster, levels = my_levels)
## where values are zero, add NA
## find wells where it's zero
zero_values <- dot_plot_merged$value == 0
dot_plot_merged$value[zero_values] <- NA
## also do for raw number
zero_values <- dot_plot_merged$raw_number == 0
dot_plot_merged$raw_number[zero_values] <- NA
## reorder x axis:
my_levels_genotype <- c("GCSKO-oom", "GCSKO-29", "GCSKO-3", "GCSKO-2", "GCSKO-19", "GCSKO-28", "GCSKO-21", "GCSKO-13", "GCSKO-17", "GCSKO-20", "GCSKO-10_820", "WT", "WT_10X")
dot_plot_merged$identity <- factor(x = dot_plot_df_pc_melted$identity, levels = my_levels_genotype)plot
dot_plot_identity <- ggplot(dot_plot_merged, aes(y = factor(cluster), x = factor(identity))) +
## make into a dot plot
geom_point(aes(colour=value, size=raw_number)) +
scale_color_gradient(low="blue", high="red", limits=c( 0, max(dot_plot_df_pc_melted$value)), na.value="white") +
#change the colours
scale_colour_viridis(option = "inferno", guide = "colourbar", na.value="white") +
theme_classic() +
theme(panel.grid.major=element_blank(), panel.grid.minor=element_blank()) +
ylab("Cluster") +
xlab("Identity") +
labs(colour = "% cells of that genotype represented in that cluster", size = "number of cells of that genotype represented in that cluster") +
theme(axis.text.x=element_text(size=12, angle=45, hjust=1, vjust=1), axis.text.y=element_text(size=12), legend.position = "bottom", legend.direction = "horizontal", legend.box = "vertical", text=element_text(size=16, family="Arial")) +
## annotate males
geom_hline(aes(yintercept = 28.5)) +
## annotate females
geom_hline(aes(yintercept = 24.5)) +
## annotate hermaphrodite
geom_hline(aes(yintercept = 23.5)) Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.#title = "% genotype population found in each cluster",
print(dot_plot_identity)
maybe the respresentation differences have batch-effects:
#table(tenx.mutant.integrated@meta.data$sort_date, tenx.mutant.integrated@meta.data$identity_updated)Compose Final Plot
dot_plot_identity + dot_plot_markers + dot_plot_mutant_genes
## plot
dot_plot_paper_figure <- DotPlot(tenx.mutant.integrated,
features = rev(c("PBANKA-1144800", "PBANKA-1435200", "PBANKA-1418100", "PBANKA-0902300", "PBANKA-1454800", "PBANKA-0828000", "PBANKA-0413400", "PBANKA-0716500", "PBANKA-0102400", "PBANKA-1447900", "PBANKA-1302700", "PBANKA-1437500", "PBANKA-0416100", "PBANKA-1300700", "PBANKA-0915000", "PBANKA-1443300", "PBANKA-1145900")), group.by = "seurat_clusters_plotting") +
theme_classic() +
## change appearance and remove axis elements, and make room for arrows, and also change posoition of legends relative to one another
theme(axis.text.x = element_text(size=12, angle = 45, hjust=1,vjust=1), legend.position = "bottom", legend.direction = "horizontal", legend.box = "vertical", plot.margin = unit(c(1,3,1,3), "lines"), text=element_text(size=16, family="Arial")) +
##add these to above to remove y = plot.title = element_blank(), axis.text.y = element_blank(), axis.ticks.y = element_blank(), axis.title.y = element_blank()
## change the colours
scale_colour_viridis(option = "inferno", guide = "colourbar", na.value="white", begin = 0, end = 1, direction = 1) +
## change x axis label
labs(x = "Gene", title = "", y = "Cluster") +
## annotate males
geom_hline(aes(yintercept = 28.5)) +
## annotate females
geom_hline(aes(yintercept = 24.5)) +
## annotate hermaphrodite
geom_hline(aes(yintercept = 23.5)) +
## change label on bottom of plot so we can indicate markers
scale_x_discrete(labels = rev((c(expression(paste(italic("fd5"))),
expression(paste(italic("fd4"))),
expression(paste(italic("fd3"))),
expression(paste(italic("fd2"))),
expression(paste(italic("fd1"))),
expression(paste(italic("gd1"))),
expression(paste(italic("md5"))),
expression(paste(italic("md4"))),
expression(paste(italic("md3"))),
expression(paste(italic("md2"))),
expression(paste(italic("md1"))),
expression(paste(italic("ap2-g"))),
expression(paste(italic("dhc, putative"), "(male)")),
expression(paste(italic("ccp1"), "(female)")),
expression(paste(italic("ama1"), "(schizont)")),
expression(paste(italic("msp9"), "(troph)")),
expression(paste(italic("mahrp1b"), "(ring)"))))))Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.## view
print(dot_plot_paper_figure)
save
ggsave("../images_to_export/merge_dot_plot.png", plot = dot_plot_paper_figure, device = "png", path = NULL, scale = 1, width = 30, height = 35, units = "cm", dpi = 300, limitsize = TRUE)8. Subset sexual cells
Make a subsetted Seurat object of sexual cells.
Include the pre-branch too as well as any weird clusters that may have clustered out.
it’s been a while since we looked at the clusters so let’s check them out again:
## Plot
DimPlot(tenx.mutant.integrated, label = TRUE, repel = TRUE, pt.size = 0.05, group.by = "seurat_clusters", dims = c(2,1), reduction = "DIM_UMAP") + coord_fixed()
Define cells and subset
## define cells
## 2 and 0 are at the beginning of the stalk
sex_clusters <- c(bipotential_clusters, female_clusters, male_clusters, "0", "3")
## subset cells into new object
tenx.mutant.integrated.sex <- subset(tenx.mutant.integrated, idents = sex_clusters)inspect/check
## inspect object
tenx.mutant.integrated.sexAn object of class Seurat
10116 features across 3700 samples within 2 assays
Active assay: integrated (5018 features, 2000 variable features)
1 other assay present: RNA
3 dimensional reductions calculated: pca, umap, DIM_UMAP## look at original UMAP
DimPlot(tenx.mutant.integrated.sex, label = TRUE, repel = TRUE, pt.size = 0.1, split.by = "experiment", dims = c(2,1), reduction = "DIM_UMAP") + coord_fixed()
Remove contaminant asexual cells
we want to remove:
## look at original UMAP
DimPlot(tenx.mutant.integrated.sex, label = TRUE, repel = TRUE, pt.size = 0.1, dims = c(2,1), reduction = "DIM_UMAP") + coord_fixed() + geom_hline(aes(yintercept = -1.2, alpha = 5)) + geom_vline(aes(xintercept = 0.1, alpha = 5))
## extract cell embeddings
df_sex_cell_embeddings <- as.data.frame(tenx.mutant.integrated.sex@reductions[["DIM_UMAP"]]@cell.embeddings)
## subset anything lower than -0.75 in UMAP 2 and -7 in UMAP 1
remove_cells <- row.names(df_sex_cell_embeddings[which(df_sex_cell_embeddings$DIMUMAP_2 < 0.1 & df_sex_cell_embeddings$DIMUMAP_1 > -1.2), ])
## plot these cells
DimPlot(tenx.mutant.integrated.sex, label = FALSE, repel = TRUE, pt.size = 0.1, cells.highlight = remove_cells, dims = c(2,1), reduction = "DIM_UMAP") +
coord_fixed() +
scale_color_manual(values=c("#000000", "#f54e1e")) +
theme_void() +
#labs(title = paste("(Mutant oom)","\n", "PBANKA_1302700")) +
theme(plot.title = element_text(hjust = 0.5), legend.position = "none")Scale for 'colour' is already present. Adding another scale for
'colour', which will replace the existing scale.
DimPlot(tenx.mutant.integrated.sex, label = FALSE, repel = TRUE, pt.size = 1, dims = c(2,1), reduction = "DIM_UMAP", group.by = "identity_combined") +
coord_fixed() 
then check what the IDs of these cells are to ensure they aren’t a genuine mutant signature
tenx.mutant.integrated.sex@meta.data[rownames(tenx.mutant.integrated.sex@meta.data) %in% remove_cells, ]$identity_combined[1] "GCSKO-21" "GCSKO-21" "GCSKO-21" "GCSKO-21"
[5] "GCSKO-21" "GCSKO-19" "GCSKO-13" "GCSKO-10_820"
[9] "WT" Although there are a number of GCSKO-21 cells, there are still many remaining in the sex cluster above and the cells near the asexual cycle also have a GCSKO-17 cell with them and are therefore not exclusively belonging to that mutant so we will remove these cells.
Final Subset
## make keep cells from the remove_cells
## make the not in function
'%ni%' <- Negate('%in%')
keep_cells <- colnames(tenx.mutant.integrated.sex)[which(colnames(tenx.mutant.integrated.sex) %ni% remove_cells)]
## subset
tenx.mutant.integrated.sex <- subset(tenx.mutant.integrated.sex, cells = keep_cells)
## inspect
tenx.mutant.integrated.sexAn object of class Seurat
10116 features across 3691 samples within 2 assays
Active assay: integrated (5018 features, 2000 variable features)
1 other assay present: RNA
3 dimensional reductions calculated: pca, umap, DIM_UMAPcopy old clusters over
## copy old clusters
tenx.mutant.integrated.sex <- AddMetaData(tenx.mutant.integrated.sex, tenx.mutant.integrated.sex@meta.data$seurat_clusters, col.name = "post_integration_clusters")9. Save and Export
Save environment
## This saves everything in the global environment for easy recall later
#save.image(file = "GCSKO_merge.RData")
#load(file = "GCSKO_merge.RData")Save object(s)
## Save an object to a file
saveRDS(tenx.mutant.integrated.sex, file = "../tenx.mutant.integrated.sex.RDS")
## Restore the object
#readRDS(file = "../data_to_export/tenx.mutant.integrated.sex.RDS")
## save integrated object to file
saveRDS(tenx.mutant.integrated, file = "../data_to_export/tenx.mutant.integrated.RDS")
## restore the object
#tenx.mutant.integrated <- readRDS("../data_to_export/tenx.mutant.integrated.RDS")Appendix
Session Info
R version 4.0.2 (2020-06-22)
Platform: x86_64-apple-darwin17.0 (64-bit)
Running under: macOS Catalina 10.15.6
Matrix products: default
BLAS: /System/Library/Frameworks/Accelerate.framework/Versions/A/Frameworks/vecLib.framework/Versions/A/libBLAS.dylib
LAPACK: /Library/Frameworks/R.framework/Versions/4.0/Resources/lib/libRlapack.dylib
locale:
[1] en_GB.UTF-8/en_GB.UTF-8/en_GB.UTF-8/C/en_GB.UTF-8/en_GB.UTF-8
attached base packages:
[1] stats4 parallel grid stats graphics grDevices
[7] utils datasets methods base
other attached packages:
[1] RColorBrewer_1.1-2 SingleCellExperiment_1.10.1
[3] SummarizedExperiment_1.18.2 DelayedArray_0.14.1
[5] matrixStats_0.56.0 GenomicRanges_1.40.0
[7] GenomeInfoDb_1.24.2 IRanges_2.22.2
[9] S4Vectors_0.26.1 Biobase_2.48.0
[11] BiocGenerics_0.34.0 KernSmooth_2.23-17
[13] fields_10.3 maps_3.3.0
[15] spam_2.5-1 dotCall64_1.0-0
[17] mixtools_1.2.0 scales_1.1.1
[19] knitr_1.29 reshape2_1.4.4
[21] Hmisc_4.4-0 Formula_1.2-3
[23] survival_3.2-3 lattice_0.20-41
[25] gridExtra_2.3 dplyr_1.0.0
[27] patchwork_1.0.1 ggplot2bdc_0.3.2
[29] cowplot_1.0.0 ggpubr_0.4.0
[31] ggplot2_3.3.2 viridis_0.5.1
[33] viridisLite_0.3.0 Seurat_3.2.0
loaded via a namespace (and not attached):
[1] reticulate_1.16 tidyselect_1.1.0
[3] htmlwidgets_1.5.1 Rtsne_0.15
[5] devtools_2.3.0 munsell_0.5.0
[7] codetools_0.2-16 ica_1.0-2
[9] future_1.18.0 miniUI_0.1.1.1
[11] withr_2.2.0 colorspace_1.4-1
[13] highr_0.8 rstudioapi_0.11
[15] ROCR_1.0-11 ggsignif_0.6.0
[17] tensor_1.5 listenv_0.8.0
[19] labeling_0.3 GenomeInfoDbData_1.2.3
[21] polyclip_1.10-0 farver_2.0.3
[23] pheatmap_1.0.12 rprojroot_1.3-2
[25] vctrs_0.3.2 generics_0.0.2
[27] xfun_0.15 R6_2.4.1
[29] rsvd_1.0.3 bitops_1.0-6
[31] spatstat.utils_1.17-0 assertthat_0.2.1
[33] promises_1.1.1 nnet_7.3-14
[35] gtable_0.3.0 globals_0.12.5
[37] processx_3.4.3 goftest_1.2-2
[39] rlang_0.4.7 splines_4.0.2
[41] rstatix_0.6.0 lazyeval_0.2.2
[43] acepack_1.4.1 hexbin_1.28.1
[45] broom_0.7.0 checkmate_2.0.0
[47] yaml_2.2.1 abind_1.4-5
[49] crosstalk_1.1.0.1 backports_1.1.8
[51] httpuv_1.5.4 tools_4.0.2
[53] usethis_1.6.1 ellipsis_0.3.1
[55] sessioninfo_1.1.1 ggridges_0.5.2
[57] Rcpp_1.0.5 plyr_1.8.6
[59] zlibbioc_1.34.0 base64enc_0.1-3
[61] RCurl_1.98-1.2 purrr_0.3.4
[63] ps_1.3.3 prettyunits_1.1.1
[65] rpart_4.1-15 deldir_0.1-28
[67] pbapply_1.4-2 zoo_1.8-8
[69] haven_2.3.1 ggrepel_0.8.2
[71] cluster_2.1.0 fs_1.4.2
[73] tinytex_0.25 magrittr_1.5
[75] data.table_1.12.8 RSpectra_0.16-0
[77] openxlsx_4.1.5 lmtest_0.9-37
[79] RANN_2.6.1 fitdistrplus_1.1-1
[81] pkgload_1.1.0 hms_0.5.3
[83] mime_0.9 evaluate_0.14
[85] xtable_1.8-4 rio_0.5.16
[87] jpeg_0.1-8.1 readxl_1.3.1
[89] testthat_2.3.2 compiler_4.0.2
[91] tibble_3.0.3 crayon_1.3.4
[93] htmltools_0.5.0 segmented_1.2-0
[95] mgcv_1.8-31 later_1.1.0.1
[97] tidyr_1.1.0 MASS_7.3-51.6
[99] Matrix_1.2-18 car_3.0-8
[101] cli_2.0.2 igraph_1.2.5
[103] forcats_0.5.0 pkgconfig_2.0.3
[105] foreign_0.8-80 plotly_4.9.2.1
[107] XVector_0.28.0 stringr_1.4.0
[109] callr_3.4.3 digest_0.6.25
[111] sctransform_0.2.1 RcppAnnoy_0.0.16
[113] spatstat.data_1.4-3 rmarkdown_2.3
[115] cellranger_1.1.0 leiden_0.3.3
[117] htmlTable_2.0.1 uwot_0.1.8
[119] curl_4.3 kernlab_0.9-29
[121] shiny_1.5.0 lifecycle_0.2.0
[123] nlme_3.1-148 jsonlite_1.7.0
[125] carData_3.0-4 limma_3.44.3
[127] desc_1.2.0 fansi_0.4.1
[129] pillar_1.4.6 fastmap_1.0.1
[131] httr_1.4.2 pkgbuild_1.1.0
[133] glue_1.4.1 remotes_2.1.1
[135] zip_2.1.0 spatstat_1.64-1
[137] png_0.1-7 stringi_1.4.6
[139] latticeExtra_0.6-29 memoise_1.1.0
[141] irlba_2.3.3 future.apply_1.6.0
[143] ape_5.4 Extras
Part 2 export data frames for Arthur
– Subset only 10X cells
– cluster 24 is predetermination cells – cluster 29 is post cells – cluster 36 is post cells
## Subset 10X Dataset, cluster 24
## extract only cells in cluster 24
seurat.object.subset <- SubsetData(tenx.mutant.integrated, subset.name = "seurat_clusters", accept.value = c("24"))
## get the names of the cells in cluster of interest
names_of_cells_in_cluster_24 <- colnames(seurat.object.subset@assays$RNA@counts)
## subset seurat
tenx_cluster_24 <- SubsetData(pb_sex_filtered, cells = names_of_cells_in_cluster_24)
## extract data
tenx_cluster_24_matrix_data <- as(as.matrix(GetAssayData(tenx_cluster_24, assay = "RNA", slot = "data")), 'sparseMatrix')
## extract counts
tenx_cluster_24_matrix_counts <- as(as.matrix(GetAssayData(tenx_cluster_24, assay = "RNA", slot = "counts")), 'sparseMatrix')
## extract meta data
## make big meta data dataframe
meta_df <- data.frame(tenx.mutant.integrated.sex@meta.data)
#meta_df <- data.frame(tenx.mutant.integrated@meta.data)
tenx_cluster_24_pd <- meta_df[which(rownames(meta_df) %in% colnames(tenx_cluster_24_matrix_counts)), ]
# save all 3 files
#write.csv(tenx_cluster_24_matrix_data, file = "~/data_to_export/tenx_cluster_24_matrix_data.csv")
#write.csv(tenx_cluster_24_matrix_counts, file = "~/data_to_export/tenx_cluster_24_matrix_counts.csv")
write.csv(tenx_cluster_24_pd, file = "~/data_to_export/tenx_cluster_24_pd.csv")
## Subset 10X Dataset, cluster 29
# extract only cells in cluster 29
seurat.object.subset <- SubsetData(tenx.mutant.integrated, subset.name = "seurat_clusters", accept.value = c("29"))
#get the names of the cells in cluster of interest
names_of_cells_in_cluster_29 <- colnames(seurat.object.subset@assays$RNA@counts)
# subset seurat
tenx_cluster_29 <- SubsetData(pb_sex_filtered, cells = names_of_cells_in_cluster_29)
# extract data
tenx_cluster_29_matrix_data <- as(as.matrix(GetAssayData(tenx_cluster_29, assay = "RNA", slot = "data")), 'sparseMatrix')
# extract counts
tenx_cluster_29_matrix_counts <- as(as.matrix(GetAssayData(tenx_cluster_29, assay = "RNA", slot = "counts")), 'sparseMatrix')
# extract meta data
tenx_cluster_29_pd <- meta_df[which(rownames(meta_df) %in% colnames(tenx_cluster_29_matrix_counts)), ]
# save all 3 files
#write.csv(tenx_cluster_29_matrix_data, file = "~/data_to_export/tenx_cluster_29_matrix_data.csv")
#write.csv(tenx_cluster_29_matrix_counts, file = "~/data_to_export/tenx_cluster_29_matrix_counts.csv")
write.csv(tenx_cluster_29_pd, file = "~/data_to_export/tenx_cluster_29_pd.csv")
## Subset 10X Dataset, cluster 36
# extract only cells in cluster 36
seurat.object.subset <- SubsetData(tenx.mutant.integrated, subset.name = "seurat_clusters", accept.value = c("36"))
#get the names of the cells in cluster of interest
names_of_cells_in_cluster_36 <- colnames(seurat.object.subset@assays$RNA@counts)
# subset seurat
tenx_cluster_36 <- SubsetData(pb_sex_filtered, cells = names_of_cells_in_cluster_36)
# extract data
tenx_cluster_36_matrix_data <- as(as.matrix(GetAssayData(tenx_cluster_36, assay = "RNA", slot = "data")), 'sparseMatrix')
# extract counts
tenx_cluster_36_matrix_counts <- as(as.matrix(GetAssayData(tenx_cluster_36, assay = "RNA", slot = "counts")), 'sparseMatrix')
# extract meta data
tenx_cluster_36_pd <- meta_df[which(rownames(meta_df) %in% colnames(tenx_cluster_36_matrix_counts)), ]
# save all 3 files
#write.csv(tenx_cluster_36_matrix_data, file = "~/data_to_export/tenx_cluster_36_matrix_data.csv")
#write.csv(tenx_cluster_36_matrix_counts, file = "~/data_to_export/tenx_cluster_36_matrix_counts.csv")
write.csv(tenx_cluster_36_pd, file = "~/data_to_export/tenx_cluster_36_pd.csv")LS0tCnN1YnRpdGxlOiAnR2FtZXRvY3l0ZSBEZXZlbG9wbWVudCBpbiA8aT5QbGFzbW9kaXVtIGJlcmdoZWk8L2k+Jwp0aXRsZTogfAogICFbXSguLi9HQ1NLT19sb2dvLmpwZyl7d2lkdGg9MzAwcHh9ICAKICBNZXJnaW5nIFNtYXJ0LXNlcTIgYW5kIDEwWCBEYXRhc2V0cwphdXRob3I6ICJbQW5kcmV3IFJ1c3NlbGxdKGh0dHBzOi8vYWpjcnVzc2VsbC53aXhzaXRlLmNvbS9teXNpdGUvYWJvdXQpIgppbnN0aXR1dGU6IFdlbGxjb21lIFNhbmdlciBJbnN0aXR1dGUKZGF0ZTogJ2ByIGZvcm1hdChTeXMuRGF0ZSgpLCAiJUIgJWQsICVZIilgJwpvdXRwdXQ6CiAgaHRtbF9ub3RlYm9vazoKICAgIHRoZW1lOiBjb3NtbwogICAgdG9jOiB5ZXMKICAgIHRvY19kZXB0aDogMwogICAgI3RvY19mbG9hdDogeWVzCiAgICBkZl9wcmludDogcGFnZWQKLS0tCioqKgojIDEuIEludHJvZHVjdGlvbiBhbmQgQWltcyB7LnRhYnNldH0KCldlIGhhdmUgcXVhbGl0eS1jb250cm9sbGVkIHRoZSAxMFggZGF0YSBhbmQgdGhlIFNTMiBkYXRhIGFuZCBub3cgYXJlIGxlZnQgd2l0aCB0aGUgZm9sbG93aW5nIG9iamVjdHM6CgoxMFggNUsgZGF0YSAtIHBiX3NleF9maWx0ZXJlZAoKMTBYIDMwSyBkYXRhIC0gcGJfMzBrX3NleF9maWx0ZXJlZCAKClNTMiBtdXRhbnQgZGF0YSAtIHNzMl9tdXRhbnRzX2ZpbmFsCgojIDIuIFJlYWQgaW4gdGhlIGRhdGEgIHsudGFic2V0fQoKIyMjIExvYWQvSW5zdGFsbCB0aGUgUmVxdWlyZWQgUGFja2FnZXMKCmBgYHtyIGxvYWQgcGFja2FnZXMsIGVjaG8gPSBGQUxTRX0KIyMgQ1JBTiBwYWNrYWdlcwoKIyMgUGF0aHdvcmsgaXMgbmVlZGVkIHRvIHN0aWNoIHBsb3RzIHRvZ2V0aGVyIHVzaW5nICcrJwppZihyZXF1aXJlKCJwYXRjaHdvcmsiLCBxdWlldGx5ID0gVFJVRSkpewogICAgcHJpbnQoInBhdGNod29yayBpcyBsb2FkZWQgY29ycmVjdGx5IikKfSBlbHNlIHsKICAgIHByaW50KCJ0cnlpbmcgdG8gaW5zdGFsbCBwYXRjaHdvcmsiKQogICAgaW5zdGFsbC5wYWNrYWdlcygicGF0Y2h3b3JrIikKICAgIGlmKHJlcXVpcmUocGF0Y2h3b3JrKSl7CiAgICAgICAgcHJpbnQoInBhdGNod29yayBpbnN0YWxsZWQgYW5kIGxvYWRlZCIpCiAgICB9IGVsc2UgewogICAgICAgIHN0b3AoImNvdWxkIG5vdCBpbnN0YWxsIHBhdGNod29yayIpCiAgICB9Cn0KCiMjIHZpcmlkaXMgYWxsb3dzIGRpZmZlcmVudCBjb2xvdXJzIHRvIGJlIGFkZGVkIHRvIHBsb3RzCmlmKHJlcXVpcmUoInZpcmlkaXMiLCBxdWlldGx5ID0gVFJVRSkpewogICAgcHJpbnQoInZpcmlkaXMgaXMgbG9hZGVkIGNvcnJlY3RseSIpCn0gZWxzZSB7CiAgICBwcmludCgidHJ5aW5nIHRvIGluc3RhbGwgdmlyaWRpcyIpCiAgICBpbnN0YWxsLnBhY2thZ2VzKCJ2aXJpZGlzIikKICAgIGlmKHJlcXVpcmUodmlyaWRpcykpewogICAgICAgIHByaW50KCJ2aXJpZGlzIGluc3RhbGxlZCBhbmQgbG9hZGVkIikKICAgIH0gZWxzZSB7CiAgICAgICAgc3RvcCgiY291bGQgbm90IGluc3RhbGwgdmlyaWRpcyIpCiAgICB9Cn0KCiMjIFNldXJhdCBpcyBuZWVkZWQgZm9yIG1vc3Qgb2YgdGhpcyBzY3JpcHQKaWYocmVxdWlyZSgiU2V1cmF0IiwgcXVpZXRseSA9IFRSVUUpKXsKICAgIHByaW50KCJTZXVyYXQgaXMgbG9hZGVkIGNvcnJlY3RseSIpCn0gZWxzZSB7CiAgICBwcmludCgidHJ5aW5nIHRvIGluc3RhbGwgU2V1cmF0IikKICAgIGluc3RhbGwucGFja2FnZXMoIlNldXJhdCIpCiAgICBpZihyZXF1aXJlKFNldXJhdCkpewogICAgICAgIHByaW50KCJTZXVyYXQgaW5zdGFsbGVkIGFuZCBsb2FkZWQiKQogICAgfSBlbHNlIHsKICAgICAgICBzdG9wKCJjb3VsZCBub3QgaW5zdGFsbCBTZXVyYXQiKQogICAgfQp9CgojIyBjb3dwbG90IGlzIG5lZWRlZCBmb3IgcGxvdHMgaW4gdGhpcyBzY3JpcHQKaWYocmVxdWlyZSgiY293cGxvdCIpKXsKICAgIHByaW50KCJjb3dwbG90IGlzIGxvYWRlZCBjb3JyZWN0bHkiKQp9IGVsc2UgewogICAgcHJpbnQoInRyeWluZyB0byBpbnN0YWxsIGNvd3Bsb3QiKQogICAgaW5zdGFsbC5wYWNrYWdlcygiY293cGxvdCIpCiAgICBpZihyZXF1aXJlKGNvd3Bsb3QpKXsKICAgICAgICBwcmludCgiY293cGxvdCBpbnN0YWxsZWQgYW5kIGxvYWRlZCIpCiAgICB9IGVsc2UgewogICAgICAgIHN0b3AoImNvdWxkIG5vdCBpbnN0YWxsIGNvd3Bsb3QiKQogICAgfQp9CgojIyBncmlkRXh0cmEgaXMgbmVlZGVkIGZvciBncmlkIGdyYXBoaWNzIHRvIHBsb3QgbXVsdGlwbGUgcGxvdHMgaW4gdGhlIHNhbWUgdmlldwppZihyZXF1aXJlKCJncmlkRXh0cmEiKSl7CiAgICBwcmludCgiZ3JpZEV4dHJhIGlzIGxvYWRlZCBjb3JyZWN0bHkiKQp9IGVsc2UgewogICAgcHJpbnQoInRyeWluZyB0byBpbnN0YWxsIGdyaWRFeHRyYSIpCiAgICBpbnN0YWxsLnBhY2thZ2VzKCJncmlkRXh0cmEiKQogICAgaWYocmVxdWlyZShncmlkRXh0cmEpKXsKICAgICAgICBwcmludCgiZ3JpZEV4dHJhIGluc3RhbGxlZCBhbmQgbG9hZGVkIikKICAgIH0gZWxzZSB7CiAgICAgICAgc3RvcCgiY291bGQgbm90IGluc3RhbGwgZ3JpZEV4dHJhIikKICAgIH0KfQoKIyMgZ3JpZCBpcyBuZWVkZWQgZm9yIGdyaWQuYXJyYW5nZSBmdW5jdGlvbiB0byBjaGFuZ2Ugc2l6ZSBvZiB0aXRsZQppZihyZXF1aXJlKCJncmlkIikpewogICAgcHJpbnQoImdyaWQgaXMgbG9hZGVkIGNvcnJlY3RseSIpCn0gZWxzZSB7CiAgICBwcmludCgidHJ5aW5nIHRvIGluc3RhbGwgZ3JpZCIpCiAgICBpbnN0YWxsLnBhY2thZ2VzKCJncmlkIikKICAgIGlmKHJlcXVpcmUoZ3JpZCkpewogICAgICAgIHByaW50KCJncmlkIGluc3RhbGxlZCBhbmQgbG9hZGVkIikKICAgIH0gZWxzZSB7CiAgICAgICAgc3RvcCgiY291bGQgbm90IGluc3RhbGwgZ3JpZCIpCiAgICB9Cn0KCiMjZm9yIGRvaW5nIGJ1bGsgY29ycmVsYXRpb24gY2FsY3VsYXRpb25zCmlmKHJlcXVpcmUoIkhtaXNjIikpewogICAgcHJpbnQoIkhtaXNjIGlzIGxvYWRlZCBjb3JyZWN0bHkiKQp9IGVsc2UgewogICAgcHJpbnQoInRyeWluZyB0byBpbnN0YWxsIEhtaXNjIikKICAgIGluc3RhbGwucGFja2FnZXMoIkhtaXNjIikKICAgIGlmKHJlcXVpcmUoSG1pc2MpKXsKICAgICAgICBwcmludCgiSG1pc2MgaW5zdGFsbGVkIGFuZCBsb2FkZWQiKQogICAgfSBlbHNlIHsKICAgICAgICBzdG9wKCJjb3VsZCBub3QgaW5zdGFsbCBIbWlzYyIpCiAgICB9Cn0KCiMjIHJlc2hhcGUyIHRvIG1lbHQgZGF0YWZyYW1lcyBmb3IgcGxvdHRpbmc6CmlmKHJlcXVpcmUoInJlc2hhcGUyIikpewogICAgcHJpbnQoInJlc2hhcGUyIGlzIGxvYWRlZCBjb3JyZWN0bHkiKQp9IGVsc2UgewogICAgcHJpbnQoInRyeWluZyB0byBpbnN0YWxsIHJlc2hhcGUyIikKICAgIGluc3RhbGwucGFja2FnZXMoInJlc2hhcGUyIikKICAgIGlmKHJlcXVpcmUocmVzaGFwZTIpKXsKICAgICAgICBwcmludCgicmVzaGFwZTIgaW5zdGFsbGVkIGFuZCBsb2FkZWQiKQogICAgfSBlbHNlIHsKICAgICAgICBzdG9wKCJjb3VsZCBub3QgaW5zdGFsbCByZXNoYXBlMiIpCiAgICB9Cn0KCiMjIHRvIHdvcmsgd2l0aCBkYXRhIGZyYW1lczoKaWYocmVxdWlyZSgiZHBseXIiKSl7CiAgICBwcmludCgiZHBseXIgaXMgbG9hZGVkIGNvcnJlY3RseSIpCn0gZWxzZSB7CiAgICBwcmludCgidHJ5aW5nIHRvIGluc3RhbGwgZHBseXIiKQogICAgaW5zdGFsbC5wYWNrYWdlcygiZHBseXIiKQogICAgaWYocmVxdWlyZShkcGx5cikpewogICAgICAgIHByaW50KCJkcGx5ciBpbnN0YWxsZWQgYW5kIGxvYWRlZCIpCiAgICB9IGVsc2UgewogICAgICAgIHN0b3AoImNvdWxkIG5vdCBpbnN0YWxsIGRwbHlyIikKICAgIH0KfQoKIyMgc2V0IHRoZSBzZWVkIGZvciBib3RoIHRoZSBtaXh0dXJlIG1vZGVscyBhbmQgYWxzbyBmb3IgdGhlIHNhbXBsZSBmdW5jdGlvbiBsYXRlciBvbjoKc2V0LnNlZWQoLTkyNDk3KQpgYGAKCiMjIyBSZWFkIGluIHRoZSBEYXRhCgpzY3JlZW4gaGl0cwpgYGB7cn0KIyMgRURJVCAtIGNoYW5nZSB0aGlzIHRvIHRoZSBleGNlbCB0YWJsZSBvbmNlIHdlIGhhdmUgaXQgZmluYWxpc2VkIGZvciB0aGUgc2NyZWVuCnNjcmVlbl9oaXRzIDwtIGMoIlBCQU5LQS0wNTE2MzAwIiwKIlBCQU5LQS0xMjE3NzAwIiwKIlBCQU5LQS0wNDA5MTAwIiwKIlBCQU5LQS0xMDM0MzAwIiwKIlBCQU5LQS0xNDM3NTAwIiwKIlBCQU5LQS0wODI3NTAwIiwKIlBCQU5LQS0wODI0MzAwIiwKIlBCQU5LQS0xNDI2OTAwIiwKIlBCQU5LQS0wMTA1MzAwIiwKIlBCQU5LQS0wOTIxMTAwIiwKIlBCQU5LQS0xMDAyNDAwIiwKIlBCQU5LQS0wODI5NDAwIiwKIlBCQU5LQS0xMzQ3MjAwIiwKIlBCQU5LQS0wODI4MDAwIiwKIlBCQU5LQS0wOTAyMzAwIiwKIlBCQU5LQS0xNDE4MTAwIiwKIlBCQU5LQS0xNDM1MjAwIiwKIlBCQU5LQS0xNDU0ODAwIiwKIlBCQU5LQS0wNzEyMzAwIiwKIlBCQU5LQS0wNDEwNTAwIiwKIlBCQU5LQS0xMTQ0ODAwIiwKIlBCQU5LQS0xMjMxNjAwIiwKIlBCQU5LQS0wNTAzMjAwIiwKIlBCQU5LQS0wMzA4OTAwIiwKIlBCQU5LQS0xMjE0NzAwIiwKIlBCQU5LQS0wNzA5OTAwIiwKIlBCQU5LQS0wMzExOTAwIiwKIlBCQU5LQS0wNzE2NTAwIiwKIlBCQU5LQS0xNDQ3OTAwIiwKIlBCQU5LQS0wMTAyMjAwIiwKIlBCQU5LQS0wNzEzNTAwIiwKIlBCQU5LQS0wMTAyNDAwIiwKIlBCQU5LQS0xMzAyNzAwIiwKIlBCQU5LQS0xMjM1OTAwIiwKIlBCQU5LQS0wNDAxMTAwIiwKIlBCQU5LQS0wNDEzNDAwIiwKIlBCQU5LQS0xMTI2OTAwIiwKIlBCQU5LQS0xNDI1OTAwIiwKIlBCQU5LQS0wNDE4MzAwIiwKIlBCQU5LQS0xNDY0NjAwIiwKIlBCQU5LQS0wODA2MDAwIikKYGBgCgpsb2FkIGluIGRhdGFzZXRzCmBgYHtyfQojIyBsb2FkIHRoZSAxMFggZGF0YXNldApwYl9zZXhfZmlsdGVyZWQgPC0gcmVhZFJEUygiLi4vZGF0YV90b19leHBvcnQvcGJfc2V4X2ZpbHRlcmVkLlJEUyIpCiMjIGxvYWQgdGhlIFNTMiBkYXRhc2V0CnNzMl9tdXRhbnRzX2ZpbmFsIDwtIHJlYWRSRFMoIi4uL2RhdGFfdG9fZXhwb3J0L3NzMl9tdXRhbnRzX2ZpbmFsLlJEUyIpCgojIyBpbnNwZWN0CnBhc3RlKCIxMHggZGF0YXNldCIpCnBiX3NleF9maWx0ZXJlZApwYXN0ZSgiU21hcnQtc2VxMiBkYXRhc2V0IikKc3MyX211dGFudHNfZmluYWwKcGFzdGUoIlRoZSBjb21wb3NpdGlvbiBvZiB0aGUgU21hcnQtc2VxMiBkYXRhc2V0IGlzOiIpCnRhYmxlKHNzMl9tdXRhbnRzX2ZpbmFsQG1ldGEuZGF0YSRnZW5vdHlwZSkKYGBgCgojIDMuIE1lcmdpbmcgdGhlIFNtYXJ0LXNlcTIgYW5kIDEwWCBEYXRhIHsudGFic2V0fQoKIyMjIFByZXBhcmUgZGF0YQoKYGBge3IgaW50ZWdyYXRpb24gMTB4IHNldHVwfQojIyBleHRyYWN0IDEweCBkYXRhCnRlbnhfNWtfY291bnRzIDwtIGFzLm1hdHJpeChwYl9zZXhfZmlsdGVyZWRAYXNzYXlzJFJOQUBjb3VudHMpCnRlbnhfNWtfcGhlbm8gPC0gcGJfc2V4X2ZpbHRlcmVkQG1ldGEuZGF0YQoKIyMgQ3JlYXRlIGZyZXNoIG9iamVjdAp0ZW54XzVrX2NvdW50c190b19pbnRlZ3JhdGUgPC0gQ3JlYXRlU2V1cmF0T2JqZWN0KGNvdW50cyA9IHRlbnhfNWtfY291bnRzLCBtZXRhLmRhdGEgPSB0ZW54XzVrX3BoZW5vLCBtaW4uY2VsbHMgPSAwLCBtaW4uZmVhdHVyZXMgPSAwLCBwcm9qZWN0ID0gIkdDU0tPIikKCiMjIGFkZCBleHBlcmltZW50IG1ldGEgZGF0YQp0ZW54XzVrX2NvdW50c190b19pbnRlZ3JhdGVAbWV0YS5kYXRhJGV4cGVyaW1lbnQgPC0gInRlbnhfNWsiCgojIyBpbnNwZWN0CnRlbnhfNWtfY291bnRzX3RvX2ludGVncmF0ZQpgYGAKCldlIG5lZWQgdG8gbWFrZSBzdXJlIHRoZSBtdXRhbnQgZGF0YSBpcyBjb21wYXRpYmxlIHdpdGggdGhlIDEwWCBkYXRhLiB0aGUgMTBYIGRhdGEgaGFzIGZld2VyIGdlbmVzIHJlcHJlc2VudGVkIHNvIHdlIG5lZWQgdG8gZmluZCB0aGUgaW50ZXJzZWN0IG9mIHRoZSB0d28gYmVmb3JlIGludGVncmF0aW9uLgpgYGB7ciBpbnRlZ3JhdGlvbiBzczIgc2V0dXB9CiMjIGV4dHJhY3QgU1MyIGRhdGEgCm11dGFudF9jb3VudHNfZm9yX2ludGVncmF0aW9uIDwtIGFzLm1hdHJpeChzczJfbXV0YW50c19maW5hbEBhc3NheXMkUk5BQGNvdW50cykKbXV0YW50X3BoZW5vX2Zvcl9pbnRlZ3JhdGlvbiA8LSBzczJfbXV0YW50c19maW5hbEBtZXRhLmRhdGEKCiMjIGNoYW5nZSBjb3VudHMgc28gdGhlIDpyUk5BIGFuZCA6dFJOQSBhcmUgbm90IHRoZXJlOgpyb3duYW1lcyhtdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvbikgPC0gZ3N1YigiOm5jUk5BIiwgIiIsIGdzdWIoIjpyUk5BIiwgIiIsIGdzdWIoIjp0Uk5BIiwgIiIsIHJvd25hbWVzKG11dGFudF9jb3VudHNfZm9yX2ludGVncmF0aW9uKSkpKQoKIyMgY2hhbmdlIHRoZSBnZW5lIG5hbWVzIHNvIHRoYXQgdGhleSBhcmUgLSByYXRoZXIgdGhhbiBfOgpyb3duYW1lcyhtdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvbikgPC0gZ3N1YigiXyIsICItIiwgcm93bmFtZXMobXV0YW50X2NvdW50c19mb3JfaW50ZWdyYXRpb24pKQoKIyMgY2FsY3VsYXRlIGhvdyBtYW55IG9mIHRoZSBnZW5lcyBvdmVybGFwIC0gMTB4IGRvZXMgc3RhcnQgb3V0IHdpdGggNTA5OCB2cyA1MjQ1CmdlbmVzX2luX3RlbnhfZGF0YXNldCA8LSBpbnRlcnNlY3Qocm93bmFtZXModGVueF81a19jb3VudHMpLCByb3duYW1lcyhtdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvbikpCiMjIHByaW50IG51bWJlciBvZiBnZW5lcyB0aGF0IG92ZXJsYXAKZGltKG11dGFudF9jb3VudHNfZm9yX2ludGVncmF0aW9uKQojIyBzdWJzZXQgdGhlIG11dGFudCBjb3VudHMgdG8gY29udGFpbiBvbmx5IDEweCBnZW5lcwptdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvbiA8LSBtdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvblt3aGljaChyb3duYW1lcyhtdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvbikgJWluJSBnZW5lc19pbl90ZW54X2RhdGFzZXQpLCBdCiMjIHByaW50IHJlc3VsdCBvZiBnZW5lcyB0aGF0IG92ZXJsYXAKZGltKG11dGFudF9jb3VudHNfZm9yX2ludGVncmF0aW9uKQoKIyMgbWFrZSBTZXVyYXQgb2JqZWN0OgpHQ1NLT19tdXRhbnRzIDwtIENyZWF0ZVNldXJhdE9iamVjdChjb3VudHMgPSBtdXRhbnRfY291bnRzX2Zvcl9pbnRlZ3JhdGlvbiwgbWV0YS5kYXRhID0gbXV0YW50X3BoZW5vX2Zvcl9pbnRlZ3JhdGlvbiwgbWluLmNlbGxzID0gMCwgbWluLmZlYXR1cmVzID0gMCwgcHJvamVjdCA9ICJHQ1NLTyIpCgojIyBhZGQgZXhwZXJpbWVudCBtZXRhIGRhdGEKR0NTS09fbXV0YW50c0BtZXRhLmRhdGEkZXhwZXJpbWVudCA8LSAibXV0YW50cyIKCiMjIGluc3BlY3QKR0NTS09fbXV0YW50cwpgYGAKCmBgYHtyfQojIyBkb3VibGUgY2hlY2sgdGhhdCB0aGlzIGlzIHRoZSBzYW1lIG51bWJlciBvZiBnZW5lcwojIyBzdWJzZXQgY291bnRzIHNvIHRoYXQgb25seSBnZW5lcyByZXByZXNlbnRlZCBpbiB0aGUgb3RoZXIgdHdvIG9iamVjdHMgYXJlIHRoZXJlOgpsZW5ndGgoaW50ZXJzZWN0KHJvd25hbWVzKHRlbnhfNWtfY291bnRzKSwgcm93bmFtZXMobXV0YW50X2NvdW50c19mb3JfaW50ZWdyYXRpb24pKSkKYGBgCgpjcmVhdGUgbGlzdCBhbmQgbm9ybWFsaXNlOgpgYGB7ciBpbnRlZ3JhdGlvbiBub3JtYWxpc2V9CiMjIG1ha2UgbGlzdAp0ZW54Lm11dGFudC5saXN0IDwtIGxpc3QodGVueF81a19jb3VudHNfdG9faW50ZWdyYXRlLCBHQ1NLT19tdXRhbnRzKQoKIyMgcHJlcGFyZSBkYXRhCmZvciAoaSBpbiAxOmxlbmd0aCh0ZW54Lm11dGFudC5saXN0KSkgewogICAgdGVueC5tdXRhbnQubGlzdFtbaV1dIDwtIE5vcm1hbGl6ZURhdGEodGVueC5tdXRhbnQubGlzdFtbaV1dLCB2ZXJib3NlID0gRkFMU0UpCiAgICB0ZW54Lm11dGFudC5saXN0W1tpXV0gPC0gRmluZFZhcmlhYmxlRmVhdHVyZXModGVueC5tdXRhbnQubGlzdFtbaV1dLCBzZWxlY3Rpb24ubWV0aG9kID0gInZzdCIsIAogICAgICAgIG5mZWF0dXJlcyA9IDIwMDAsIHZlcmJvc2UgPSBGQUxTRSkKfQpgYGAKCiMjIyBJbnRlZ3JhdGUgb2JqZWN0cwoKYGBge3IgaW50ZWdyYXRpb259CiMjIEZpbmQgYW5jaG9ycwp0ZW54Lm11dGFudC5hbmNob3JzIDwtIEZpbmRJbnRlZ3JhdGlvbkFuY2hvcnMob2JqZWN0Lmxpc3QgPSB0ZW54Lm11dGFudC5saXN0LCBkaW1zID0gMToyMSwgdmVyYm9zZSA9IEZBTFNFKQoKIyMgSW50ZWdyYXRlIGRhdGEKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBJbnRlZ3JhdGVEYXRhKGFuY2hvcnNldCA9IHRlbngubXV0YW50LmFuY2hvcnMsIGRpbXMgPSAxOjIxLCB2ZXJib3NlID0gRkFMU0UsIGZlYXR1cmVzLnRvLmludGVncmF0ZSA9IGdlbmVzX2luX3RlbnhfZGF0YXNldCkKYGBgCgojIDQuIERpbWVuc2lvbmFsaXR5IHJlZHVjdGlvbiB7LnRhYnNldH0KCiMjIyBQQ0EKYGBge3IsIGZpZy53aWR0aCA9IDEwLCBmaWcuaGVpZ2h0ID0gNX0KIyMgTWFrZSB0aGUgZGVmYXVsdCBhc3NheSBpbnRlZ3JhdGVkCkRlZmF1bHRBc3NheSh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkKSA8LSAiaW50ZWdyYXRlZCIKCiMjIFJ1biB0aGUgc3RhbmRhcmQgd29ya2Zsb3cgZm9yIHZpc3VhbGl6YXRpb24gYW5kIGNsdXN0ZXJpbmcKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBTY2FsZURhdGEodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgdmVyYm9zZSA9IEZBTFNFKQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIFJ1blBDQSh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBucGNzID0gMzAsIHZlcmJvc2UgPSBGQUxTRSkKCiMjIGluc3BlY3QgUENzCkVsYm93UGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBuZGltcyA9IDMwLCByZWR1Y3Rpb24gPSAicGNhIikKYGBgCgojIyMgVU1BUAoKIyMjIyBJbml0aWFsIFVNQVAKClJ1biBpbml0YWwgVU1BUApgYGB7cn0KIyMgUnVuIFVNQVAKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBSdW5VTUFQKHRlbngubXV0YW50LmludGVncmF0ZWQsIHJlZHVjdGlvbiA9ICJwY2EiLCBkaW1zID0gMTo4LCBuLm5laWdoYm9ycyA9IDUwLCBzZWVkLnVzZSA9IDEyMzQsIG1pbi5kaXN0ID0gMC41LCByZXB1bHNpb24uc3RyZW5ndGggPSAwLjA1KQpgYGAKClNlZSBkaXN0cmlidXRpb24gYnk6IGFsdG9nZXRoZXIsIGV4cGVyaW1lbnQsIGFuZCBtdXRhbnQgSUQKYGBge3IsIGZpZy5oZWlnaHQgPSAzLCBmaWcud2lkdGggPSA2fQojIyBQbG90CkRpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgcmVkdWN0aW9uID0gInVtYXAiLCBwdC5zaXplID0gMC4wMSkKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCByZWR1Y3Rpb24gPSAidW1hcCIsIHNwbGl0LmJ5ID0gImV4cGVyaW1lbnQiLCBwdC5zaXplID0gMC4wMSkKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCByZWR1Y3Rpb24gPSAidW1hcCIsIGdyb3VwLmJ5ID0gImlkZW50aXR5X3VwZGF0ZWQiLCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMDEpCmBgYAoKIyMjIyBPcHRpbWlzZWQgVU1BUApBZnRlciBvcHRpbWlzYXRpb24sIHRoZSBmb2xsb3dpbmcgVU1BUCBjYW4gYmUgY2FsY3VsYXRlZDoKYGBge3IgdW1hcCBydW4gMiwgZmlnLmhlaWdodCA9IDcsIGZpZy53aWR0aCA9IDd9CiMjIFJ1biBvcHRpbWlzZWQgVU1BUAp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIFJ1blVNQVAodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgcmVkdWN0aW9uID0gInBjYSIsIGRpbXMgPSAxOjEwLCBuLm5laWdoYm9ycyA9IDE1MCwgc2VlZC51c2UgPSAxMjM0LCBtaW4uZGlzdCA9IDAuNCwgcmVwdWxzaW9uLnN0cmVuZ3RoID0gMC4wMywgbG9jYWwuY29ubmVjdGl2aXR5ID0gMTUwKQpgYGAKCmBgYHtyIHVtYXAgdmlzdWFsaXNlIDJ9CiMjIHBsb3QKZHAxIDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBUUlVFLCByZXBlbCA9IEZBTFNFLCBwdC5zaXplID0gMC4wNSwgZGltcyA9IGMoMiwxKSwgZ3JvdXAuYnkgPSAiZXhwZXJpbWVudCIpICsgCiAgIyMgZml4IHRoZSBheGlzCiAgY29vcmRfZml4ZWQoKSArIAogICMjIHJldmVyc2UgdGhlIHNjYWxlCiAgc2NhbGVfeF9yZXZlcnNlKCkKCiMjIHZpZXcKZHAxCmBgYAoKTm93IHN0b3JlIHRoZXNlIHJldmVyc2VkIGVtYmVkZGluZ3MgaW4gYSBuZXcgc2xvdApgYGB7cn0KIyMgZXh0cmFjdCB0aGUgY2VsbCBlbWJlZGRpbmdzIGZyb20gdGhlIFVNQVAKbWRzIDwtIGFzLmRhdGEuZnJhbWUodGVueC5tdXRhbnQuaW50ZWdyYXRlZEByZWR1Y3Rpb25zJHVtYXBAY2VsbC5lbWJlZGRpbmdzKQoKIyMgY2hhbmdlIHRoZSBjb29yZGluYXRlcyBvZiBVTUFQIDIgc28gdGhleSBhcmUgcmV2ZXJzZWQKbWRzJFVNQVBfMiA8LSAtbWRzJFVNQVBfMgoKIyMgY2hhbmdlIG5hbWVzIG9mIHRoZSBjb2xzIApjb2xuYW1lcyhtZHMpIDwtIHBhc3RlMCgiRElNX1VNQVBfIiwgMToyKQoKIyMgbWFrZSBpbnRvIGEgbWF0cml4IHNvIHRoYXQgaXQgY2FuIGJlIHNhdmVkIGluIFNldXJhdAptZHMgPC0gYXMubWF0cml4KG1kcykKCiMjIHN0b3JlIHRoaXMgb3B0aW1zZWQgVU1BUCBpbiBhIGN1c3RvbSBkaW0gc2xvdAp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkW1siRElNX1VNQVAiXV0gPC0gQ3JlYXRlRGltUmVkdWNPYmplY3QoZW1iZWRkaW5ncyA9IG1kcywga2V5ID0gIkRJTV9VTUFQXyIsIGFzc2F5ID0gRGVmYXVsdEFzc2F5KHRlbngubXV0YW50LmludGVncmF0ZWQpKQoKIyMgY2hlY2sKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gRkFMU0UsIHB0LnNpemUgPSAwLjA1LCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIGNvb3JkX2ZpeGVkKCkKYGBgCgojIDUuIENsdXN0ZXJpbmcgey50YWJzZXR9IAoKIyMjIEdlbmVyYXRlIGNsdXN0ZXJzClJlY2x1c3RlciBkYXRhc2V0IG5vdyB0aGF0IGl0IGlzIGludGVncmF0ZWQuIApXZSB3aWxsIGNsdXN0ZXIgd2l0aCBhIG51bWJlciBvZiByZXNvbHV0aW9ucyB0byBiZWdpbiB3aXRoIHRvIHNlZSBob3cgdGhpcyBhZmZlY3RzIHRoZSBudW1iZXIgYW5kIG5hdHVyZSBvZiB0aGUgY2x1c3RlcnMuIApgYGB7cn0KIyMgY29weSBvbGQgY2x1c3RlcnMKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBBZGRNZXRhRGF0YSh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCB0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRSTkFfc25uX3Jlcy4xLCBjb2wubmFtZSA9ICJwcmVfaW50ZWdyYXRpb25fY2x1c3RlcnMiKQoKIyMgZ2VuZXJhdGUgbmV3IGNsdXN0ZXJzIGF0IGxvdyByZXNvbHV0aW9uCiMjIDEKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBGaW5kTmVpZ2hib3JzKHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSAxOjE1KQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIEZpbmRDbHVzdGVycyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCByZXNvbHV0aW9uID0gMSwgcmFuZG9tLnNlZWQgPSA0MiwgYWxnb3JpdGhtID0gMikKCiMjIGdlbmVyYXRlIG5ldyBjbHVzdGVycyBhdCBsb3cgcmVzb2x1dGlvbgojIyAxLjIKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBGaW5kTmVpZ2hib3JzKHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSAxOjE1KQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIEZpbmRDbHVzdGVycyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCByZXNvbHV0aW9uID0gMS4yLCByYW5kb20uc2VlZCA9IDQyLCBhbGdvcml0aG0gPSAyKQoKIyMgZ2VuZXJhdGUgbmV3IGNsdXN0ZXJzIGF0IGxvdyByZXNvbHV0aW9uCiMjIDEuNQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIEZpbmROZWlnaGJvcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZGltcyA9IDE6MTUpCnRlbngubXV0YW50LmludGVncmF0ZWQgPC0gRmluZENsdXN0ZXJzKHRlbngubXV0YW50LmludGVncmF0ZWQsIHJlc29sdXRpb24gPSAxLjUsIHJhbmRvbS5zZWVkID0gNDIsIGFsZ29yaXRobSA9IDIpCgojIyBnZW5lcmF0ZSBuZXcgY2x1c3RlcnMgYXQgbWlkIHJlc29sdXRpb24KIyMgMgp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIEZpbmROZWlnaGJvcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZGltcyA9IDE6MTUpCnRlbngubXV0YW50LmludGVncmF0ZWQgPC0gRmluZENsdXN0ZXJzKHRlbngubXV0YW50LmludGVncmF0ZWQsIHJlc29sdXRpb24gPSAyLCByYW5kb20uc2VlZCA9IDQyLCBhbGdvcml0aG0gPSAyKQoKIyMgZ2VuZXJhdGUgbmV3IGNsdXN0ZXJzIGF0IGhpZ2ggcmVzb2x1dGlvbgojIyA0CnRlbngubXV0YW50LmludGVncmF0ZWQgPC0gRmluZE5laWdoYm9ycyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBkaW1zID0gMToxNSkKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBGaW5kQ2x1c3RlcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgcmVzb2x1dGlvbiA9IDQsIHJhbmRvbS5zZWVkID0gNDIsIGFsZ29yaXRobSA9IDIpCgojIyBwcmludCBpZGVudGl0aWVzCiNoZWFkKElkZW50cyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkKSwgMTApCmBgYAojIyMgSW5zcGVjdCBjbHVzdGVycyBhdCBkaWZmZXJlbnQgcmVzb2x1dGlvbnMKCiMjIyMgcmVzb2x1dGlvbiA9IDEKClZpZXcKYGBge3IsIGZpZy5oZWlnaHQgPSAzLCBmaWcud2lkdGggPSA1fQojIyBQbG90CkRpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBUUlVFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjA1LCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiLCBncm91cC5ieSA9ICJpbnRlZ3JhdGVkX3Nubl9yZXMuMSIpICsgY29vcmRfZml4ZWQoKSAKYGBgCgpNYWtlIGluZGl2aWR1YWwgcGxvdHMgaGlnaGxpZ2h0aW5nIHdoZXJlIGNlbGxzIGluIGVhY2ggY2x1c3RlciBmYWxsCmBgYHtyLCBlY2hvID0gRkFMU0UsIG1lc3NhZ2U9RkFMU0V9CiMjIGZvciBsb29wIHdoaWNoIHRha2VzIGVhY2ggY2x1c3RlciBhbmQgbWFrZXMgYSBsaXN0IG9mIGNlbGxzIGFuZCB0aGVuIHBsb3RzIGEgaGlnaGxpZ2h0ZWQgcGxvdCBhbmQgYWRkcyBpdCB0byBhIGxpc3QKCiMjIG1ha2UgYSBibGFuayBsaXN0Cmxpc3RfVU1BUHNfYnlfY2x1c3RlciA8LSB2ZWN0b3IobW9kZSA9ICJsaXN0IiwgbGVuZ3RoID0gbGVuZ3RoKGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMSkpKQoKIyMgZm9yIGxvb3AKZm9yKGkgaW4gc2VxX2Fsb25nKGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMSkpKXsKICAjIyBtYWtlIGEgbGlzdCBvZiBjZWxscwogIGxpc3Rfb2ZfY2VsbHMgPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjEgPT0gbGV2ZWxzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGludGVncmF0ZWRfc25uX3Jlcy4xKVtpXSksIF0pCiAgdWFtcF9wbG90IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBsaXN0X29mX2NlbGxzLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArCiAgICAjIyBmaXggY29vcmRpbmF0ZXMKICAgIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiY2x1c3RlciIsIGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMSlbaV0pKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUpLCBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCiAgIyMgYWRkIHRvIHRoZSBsaXN0CiAgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1tpXV0gPC0gdWFtcF9wbG90Cn0KCiMjIGNoZWNrIG51bWJlciBvZiBjbHVzdGVycwojbGVuZ3RoKGxpc3RfVU1BUHNfYnlfY2x1c3RlcikKYGBgCgpwbG90CmBgYHtyLCBmaWcuaGVpZ2h0ID0gMTAsIGZpZy53aWR0aCA9IDEwfQojIyB0aGlzIGZ1bmN0aW9uIHdyaXRlcyB0aGUgbmV4dCBiaXQgb2YgY29kZSBmb3IgeW91CiMjIHB1dCBpdCBpbnRvIHRoZSBjb25zb2xlIGFuZCBwYXN0ZSB0aGUgcmVzcG9uc2UKI3Bsb3R5IDwtIGMoKQojZm9yKGkgaW4gc2VxX2Fsb25nKGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRzZXVyYXRfY2x1c3RlcnMpKSl7CiMgIHBsb3R5IDwtIHBhc3RlMChwbG90eSwgImxpc3RfVU1BUHNfYnlfY2x1c3RlcltbIiwgaSwgIl1dIiwgIiArICIpCiN9CgojIyBwbG90Cmxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1syXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzNdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbNF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzZdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbN11dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzldXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTBdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTFdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTJdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTNdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTRdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTVdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTZdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTddXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMThdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMTldXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMjBdXQpgYGAKCiMjIyMgcmVzb2x1dGlvbiA9IDEuMgoKVmlldwpgYGB7ciwgZmlnLmhlaWdodCA9IDMsIGZpZy53aWR0aCA9IDV9CiMjIFBsb3QKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMDUsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGdyb3VwLmJ5ID0gImludGVncmF0ZWRfc25uX3Jlcy4xLjIiKSArIGNvb3JkX2ZpeGVkKCkgCmBgYAoKTWFrZSBpbmRpdmlkdWFsIHBsb3RzIGhpZ2hsaWdodGluZyB3aGVyZSBjZWxscyBpbiBlYWNoIGNsdXN0ZXIgZmFsbApgYGB7ciwgZWNobyA9IEZBTFNFLCBtZXNzYWdlPUZBTFNFfQojIyBmb3IgbG9vcCB3aGljaCB0YWtlcyBlYWNoIGNsdXN0ZXIgYW5kIG1ha2VzIGEgbGlzdCBvZiBjZWxscyBhbmQgdGhlbiBwbG90cyBhIGhpZ2hsaWdodGVkIHBsb3QgYW5kIGFkZHMgaXQgdG8gYSBsaXN0CgojIyBtYWtlIGEgYmxhbmsgbGlzdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXIgPC0gdmVjdG9yKG1vZGUgPSAibGlzdCIsIGxlbmd0aCA9IGxlbmd0aChsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjEuMikpKQoKIyMgZm9yIGxvb3AKZm9yKGkgaW4gc2VxX2Fsb25nKGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS4yKSkpewogICMjIG1ha2UgYSBsaXN0IG9mIGNlbGxzCiAgbGlzdF9vZl9jZWxscyA8LSByb3duYW1lcyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YVt3aGljaCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS4yID09IGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS4yKVtpXSksIF0pCiAgdWFtcF9wbG90IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBsaXN0X29mX2NlbGxzLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArCiAgICAjIyBmaXggY29vcmRpbmF0ZXMKICAgIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiY2x1c3RlciIsIGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS4yKVtpXSkpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKICAjIyBhZGQgdG8gdGhlIGxpc3QKICBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbW2ldXSA8LSB1YW1wX3Bsb3QKfQoKIyMgY2hlY2sgbnVtYmVyIG9mIGNsdXN0ZXJzCiNsZW5ndGgobGlzdF9VTUFQc19ieV9jbHVzdGVyKQpgYGAKCnBsb3QKYGBge3IsIGZpZy5oZWlnaHQgPSAxMCwgZmlnLndpZHRoID0gMTB9CiMjIHRoaXMgZnVuY3Rpb24gd3JpdGVzIHRoZSBuZXh0IGJpdCBvZiBjb2RlIGZvciB5b3UKIyMgcHV0IGl0IGludG8gdGhlIGNvbnNvbGUgYW5kIHBhc3RlIHRoZSByZXNwb25zZQojcGxvdHkgPC0gYygpCiNmb3IoaSBpbiBzZXFfYWxvbmcobGV2ZWxzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNldXJhdF9jbHVzdGVycykpKXsKIyAgcGxvdHkgPC0gcGFzdGUwKHBsb3R5LCAibGlzdF9VTUFQc19ieV9jbHVzdGVyW1siLCBpLCAiXV0iLCAiICsgIikKI30KCiMjIHBsb3QKbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzJdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbM11dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzVdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbNl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzhdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbOV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxMF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxMV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxMl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxM11dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxNF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxNV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxNl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxN11dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxOF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1sxOV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1syMF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1syMV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1syMl1dCmBgYAoKIyMjIyByZXNvbHV0aW9uID0gMS41CgpgYGB7ciwgZmlnLmhlaWdodCA9IDMsIGZpZy53aWR0aCA9IDV9CiMjIFBsb3QKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMDUsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGdyb3VwLmJ5ID0gImludGVncmF0ZWRfc25uX3Jlcy4xLjUiKSArIGNvb3JkX2ZpeGVkKCkgCmBgYAoKTWFrZSBpbmRpdmlkdWFsIHBsb3RzIGhpZ2hsaWdodGluZyB3aGVyZSBjZWxscyBpbiBlYWNoIGNsdXN0ZXIgZmFsbApgYGB7ciwgZWNobyA9IEZBTFNFLCBtZXNzYWdlPUZBTFNFfQojIyBmb3IgbG9vcCB3aGljaCB0YWtlcyBlYWNoIGNsdXN0ZXIgYW5kIG1ha2VzIGEgbGlzdCBvZiBjZWxscyBhbmQgdGhlbiBwbG90cyBhIGhpZ2hsaWdodGVkIHBsb3QgYW5kIGFkZHMgaXQgdG8gYSBsaXN0CgojIyBtYWtlIGEgYmxhbmsgbGlzdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXIgPC0gdmVjdG9yKG1vZGUgPSAibGlzdCIsIGxlbmd0aCA9IGxlbmd0aChsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjEuNSkpKQoKIyMgZm9yIGxvb3AKZm9yKGkgaW4gc2VxX2Fsb25nKGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS41KSkpewogICMjIG1ha2UgYSBsaXN0IG9mIGNlbGxzCiAgbGlzdF9vZl9jZWxscyA8LSByb3duYW1lcyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YVt3aGljaCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS41ID09IGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS41KVtpXSksIF0pCiAgdWFtcF9wbG90IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBsaXN0X29mX2NlbGxzLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArCiAgICAjIyBmaXggY29vcmRpbmF0ZXMKICAgIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiY2x1c3RlciIsIGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMS41KVtpXSkpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKICAjIyBhZGQgdG8gdGhlIGxpc3QKICBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbW2ldXSA8LSB1YW1wX3Bsb3QKfQoKIyMgY2hlY2sgbnVtYmVyIG9mIGNsdXN0ZXJzCiNsZW5ndGgobGlzdF9VTUFQc19ieV9jbHVzdGVyKQpgYGAKCmBgYHtyLCBmaWcuaGVpZ2h0ID0gMTAsIGZpZy53aWR0aCA9IDEwfQojIyAxLjUgcmVzb2x1dGlvbgpsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzFdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1szXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzRdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbNV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzddXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbOF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzExXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI1XV0KYGBgCgojIyMjIHJlc29sdXRpb24gPSAyCgpWaWV3CmBgYHtyLCBmaWcuaGVpZ2h0ID0gMywgZmlnLndpZHRoID0gNX0KIyMgUGxvdApEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGxhYmVsID0gVFJVRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4wNSwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgZ3JvdXAuYnkgPSAiaW50ZWdyYXRlZF9zbm5fcmVzLjIiKSArIGNvb3JkX2ZpeGVkKCkgCmBgYAoKTWFrZSBpbmRpdmlkdWFsIHBsb3RzIGhpZ2hsaWdodGluZyB3aGVyZSBjZWxscyBpbiBlYWNoIGNsdXN0ZXIgZmFsbApgYGB7ciwgZWNobyA9IEZBTFNFLCBtZXNzYWdlPUZBTFNFfQojIyBmb3IgbG9vcCB3aGljaCB0YWtlcyBlYWNoIGNsdXN0ZXIgYW5kIG1ha2VzIGEgbGlzdCBvZiBjZWxscyBhbmQgdGhlbiBwbG90cyBhIGhpZ2hsaWdodGVkIHBsb3QgYW5kIGFkZHMgaXQgdG8gYSBsaXN0CgojIyBtYWtlIGEgYmxhbmsgbGlzdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXIgPC0gdmVjdG9yKG1vZGUgPSAibGlzdCIsIGxlbmd0aCA9IGxlbmd0aChsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjIpKSkKCiMjIGZvciBsb29wCmZvcihpIGluIHNlcV9hbG9uZyhsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjIpKSl7CiAgIyMgbWFrZSBhIGxpc3Qgb2YgY2VsbHMKICBsaXN0X29mX2NlbGxzIDwtIHJvd25hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGludGVncmF0ZWRfc25uX3Jlcy4yID09IGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMilbaV0pLCBdKQogIHVhbXBfcGxvdCA8LSBEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGxhYmVsID0gRkFMU0UsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMSwgY2VsbHMuaGlnaGxpZ2h0ID0gbGlzdF9vZl9jZWxscywgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKwogICAgIyMgZml4IGNvb3JkaW5hdGVzCiAgICBjb29yZF9maXhlZCgpICsgCiAgc2NhbGVfY29sb3JfbWFudWFsKHZhbHVlcz1jKCIjMDAwMDAwIiwgIiNmNTRlMWUiKSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoImNsdXN0ZXIiLCBsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjIpW2ldKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41KSwgbGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiKQogICMjIGFkZCB0byB0aGUgbGlzdAogIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbaV1dIDwtIHVhbXBfcGxvdAp9CgojIyBjaGVjayBudW1iZXIgb2YgY2x1c3RlcnMKI2xlbmd0aChsaXN0X1VNQVBzX2J5X2NsdXN0ZXIpCmBgYAoKcGxvdApgYGB7ciwgZmlnLmhlaWdodCA9IDEwLCBmaWcud2lkdGggPSAxMH0KIyMgdGhpcyBmdW5jdGlvbiB3cml0ZXMgdGhlIG5leHQgYml0IG9mIGNvZGUgZm9yIHlvdQojIyBwdXQgaXQgaW50byB0aGUgY29uc29sZSBhbmQgcGFzdGUgdGhlIHJlc3BvbnNlCiNwbG90eSA8LSBjKCkKI2ZvcihpIGluIHNlcV9hbG9uZyhsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzKSkpewojICBwbG90eSA8LSBwYXN0ZTAocGxvdHksICJsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWyIsIGksICJdXSIsICIgKyAiKQojfQoKIyMgcGxvdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzFdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1szXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzRdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbNV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzddXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbOF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzExXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzMwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzMxXV0KYGBgCgozIHZzIDE5IG9uIHJlc29sdXRpb24gMiBhbHJlYWR5IGxvb2tzIHByZXR0eSBjb29sOgoKYGBge3J9CiMjIHJlc2V0IHRoZSBkZWZhdWx0IGlkZW50aXR5CiMjIGdlbmVyYXRlIG5ldyBjbHVzdGVycyBhdCBtaWQgcmVzb2x1dGlvbgojIyAyCnRlbngubXV0YW50LmludGVncmF0ZWQgPC0gRmluZE5laWdoYm9ycyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBkaW1zID0gMToxNSkKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBGaW5kQ2x1c3RlcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgcmVzb2x1dGlvbiA9IDIsIHJhbmRvbS5zZWVkID0gNDIsIGFsZ29yaXRobSA9IDIpCgoKIyMgRmluZCBkZWZlcmVudGlhbGx5IGV4cHJlc3NlZCBmZWF0dXJlcyBiZXR3ZWVuIHRoZSB0d28gY2x1c3RlcnMKZWFybHkuc2V4LmRlLm1hcmtlcnMgPC0gRmluZE1hcmtlcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgaWRlbnQuMSA9ICI1IiwgaWRlbnQuMiA9ICIzIikKIyB2aWV3IHJlc3VsdHMKaGVhZChlYXJseS5zZXguZGUubWFya2VycykKYGBgCgpsb29rIGF0IHRoZW0gYWNyb3NzIHRoZSBkYXRhc2V0CgpgYGB7ciwgZmlnLmhlaWdodCA9IDZ9CkRvdFBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZmVhdHVyZXMgPSBjKHJvd25hbWVzKGVhcmx5LnNleC5kZS5tYXJrZXJzWzE6MTAsXSksICJQQkFOS0EtMTMwMjcwMCIpKSArIFJvdGF0ZWRBeGlzKCkKYGBgCgpgYGB7ciwgZmlnLmhlaWdodCA9IDZ9CkRvdFBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZmVhdHVyZXMgPSBzY3JlZW5faGl0cykgKyBSb3RhdGVkQXhpcygpCmBgYAoKYGBge3J9CiMjIGZpbmQgYWxsIG1hcmtlcnMKI2FsbC5tYXJrZXJzIDwtIEZpbmRBbGxNYXJrZXJzKHRlbngubXV0YW50LmludGVncmF0ZWQsIG9ubHkucG9zID0gRkFMU0UsIG1pbi5wY3QgPSAwLjI1LCBsb2dmYy50aHJlc2hvbGQgPSAwLjI1KQpgYGAKCmBgYHtyfQojdG9wX3R3byA8LSBhbGwubWFya2VycyAlPiUgZ3JvdXBfYnkoY2x1c3RlcikgJT4lIHRvcF9uKG4gPSAyLCB3dCA9IGF2Z19sb2dGQykKdG9wX3R3bwpgYGAKCgojIyMjIHJlc29sdXRpb24gPSA0CgpWaWV3CmBgYHtyLCBmaWcuaGVpZ2h0ID0gMywgZmlnLndpZHRoID0gNX0KIyMgUGxvdApEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGxhYmVsID0gVFJVRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4wNSwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgZ3JvdXAuYnkgPSAiaW50ZWdyYXRlZF9zbm5fcmVzLjQiKSArIGNvb3JkX2ZpeGVkKCkgCmBgYAoKTWFrZSBpbmRpdmlkdWFsIHBsb3RzIGhpZ2hsaWdodGluZyB3aGVyZSBjZWxscyBpbiBlYWNoIGNsdXN0ZXIgZmFsbApgYGB7ciwgZWNobyA9IEZBTFNFLCBtZXNzYWdlPUZBTFNFfQojIyBmb3IgbG9vcCB3aGljaCB0YWtlcyBlYWNoIGNsdXN0ZXIgYW5kIG1ha2VzIGEgbGlzdCBvZiBjZWxscyBhbmQgdGhlbiBwbG90cyBhIGhpZ2hsaWdodGVkIHBsb3QgYW5kIGFkZHMgaXQgdG8gYSBsaXN0CgojIyBtYWtlIGEgYmxhbmsgbGlzdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXIgPC0gdmVjdG9yKG1vZGUgPSAibGlzdCIsIGxlbmd0aCA9IGxlbmd0aChsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjQpKSkKCiMjIGZvciBsb29wCmZvcihpIGluIHNlcV9hbG9uZyhsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjQpKSl7CiAgIyMgbWFrZSBhIGxpc3Qgb2YgY2VsbHMKICBsaXN0X29mX2NlbGxzIDwtIHJvd25hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGludGVncmF0ZWRfc25uX3Jlcy40ID09IGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuNClbaV0pLCBdKQogIHVhbXBfcGxvdCA8LSBEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGxhYmVsID0gRkFMU0UsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMSwgY2VsbHMuaGlnaGxpZ2h0ID0gbGlzdF9vZl9jZWxscywgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKwogICAgIyMgZml4IGNvb3JkaW5hdGVzCiAgICBjb29yZF9maXhlZCgpICsgCiAgc2NhbGVfY29sb3JfbWFudWFsKHZhbHVlcz1jKCIjMDAwMDAwIiwgIiNmNTRlMWUiKSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoImNsdXN0ZXIiLCBsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjQpW2ldKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41KSwgbGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiKQogICMjIGFkZCB0byB0aGUgbGlzdAogIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbaV1dIDwtIHVhbXBfcGxvdAp9CgojIyBjaGVjayBudW1iZXIgb2YgY2x1c3RlcnMKI2xlbmd0aChsaXN0X1VNQVBzX2J5X2NsdXN0ZXIpCmBgYAoKcGxvdApgYGB7ciwgZmlnLmhlaWdodCA9IDEwLCBmaWcud2lkdGggPSAxMH0KIyMgdGhpcyBmdW5jdGlvbiB3cml0ZXMgdGhlIG5leHQgYml0IG9mIGNvZGUgZm9yIHlvdQojIyBwdXQgaXQgaW50byB0aGUgY29uc29sZSBhbmQgcGFzdGUgdGhlIHJlc3BvbnNlCiNwbG90eSA8LSBjKCkKI2ZvcihpIGluIHNlcV9hbG9uZyhsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzKSkpewojICBwbG90eSA8LSBwYXN0ZTAocGxvdHksICJsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWyIsIGksICJdXSIsICIgKyAiKQojfQoKIyMgcGxvdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzFdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1szXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzRdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbNV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzddXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbOF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzExXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzMwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzMxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzMyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzMzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzM0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzM1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzM2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzM3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzM4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzM5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzQwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzQxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzQyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzQzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzQ0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzQ1XV0KYGBgCgojIyMjIFVNQVAgY2x1c3RlcmluZwoKYGBge3J9CiMjIHJ1biBhIG5ldyBVTUFQIHdpdGggCnRlbngubXV0YW50LmludGVncmF0ZWQgPC0gUnVuVU1BUCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCByZWR1Y3Rpb24gPSAicGNhIiwgZGltcyA9IDE6MTAsIG4uY29tcG9uZW50cyA9IDEwKQpgYGAKCmBgYHtyfQojIyBnZW5lcmF0ZSBuZXcgY2x1c3RlcnMgYXQgbG93IHJlc29sdXRpb24KdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBGaW5kTmVpZ2hib3JzKHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSAxOjEwLCByZWR1Y3Rpb24gPSAidW1hcCIpCnRlbngubXV0YW50LmludGVncmF0ZWQgPC0gRmluZENsdXN0ZXJzKHRlbngubXV0YW50LmludGVncmF0ZWQsIHJlc29sdXRpb24gPSAwLjUsIHJhbmRvbS5zZWVkID0gNDIsIGFsZ29yaXRobSA9IDIpCmBgYApgYGB7ciwgZWNobyA9IEZBTFNFLCBtZXNzYWdlPUZBTFNFfQojIyBmb3IgbG9vcCB3aGljaCB0YWtlcyBlYWNoIGNsdXN0ZXIgYW5kIG1ha2VzIGEgbGlzdCBvZiBjZWxscyBhbmQgdGhlbiBwbG90cyBhIGhpZ2hsaWdodGVkIHBsb3QgYW5kIGFkZHMgaXQgdG8gYSBsaXN0CgojIyBtYWtlIGEgYmxhbmsgbGlzdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXIgPC0gdmVjdG9yKG1vZGUgPSAibGlzdCIsIGxlbmd0aCA9IGxlbmd0aChsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaW50ZWdyYXRlZF9zbm5fcmVzLjAuNSkpKQoKIyMgZm9yIGxvb3AKZm9yKGkgaW4gc2VxX2Fsb25nKGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMC41KSkpewogICMjIG1ha2UgYSBsaXN0IG9mIGNlbGxzCiAgbGlzdF9vZl9jZWxscyA8LSByb3duYW1lcyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YVt3aGljaCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMC41ID09IGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMC41KVtpXSksIF0pCiAgdWFtcF9wbG90IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBsaXN0X29mX2NlbGxzLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArCiAgICAjIyBmaXggY29vcmRpbmF0ZXMKICAgIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiY2x1c3RlciIsIGxldmVscyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpbnRlZ3JhdGVkX3Nubl9yZXMuMC41KVtpXSkpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKICAjIyBhZGQgdG8gdGhlIGxpc3QKICBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbW2ldXSA8LSB1YW1wX3Bsb3QKfQoKIyMgY2hlY2sgbnVtYmVyIG9mIGNsdXN0ZXJzCmxlbmd0aChsaXN0X1VNQVBzX2J5X2NsdXN0ZXIpCmBgYAoKcGxvdApgYGB7ciwgZmlnLmhlaWdodCA9IDEwLCBmaWcud2lkdGggPSAxMH0KIyMgdGhpcyBmdW5jdGlvbiB3cml0ZXMgdGhlIG5leHQgYml0IG9mIGNvZGUgZm9yIHlvdQojIyBwdXQgaXQgaW50byB0aGUgY29uc29sZSBhbmQgcGFzdGUgdGhlIHJlc3BvbnNlCiNwbG90eSA8LSBjKCkKI2ZvcihpIGluIHNlcV9hbG9uZyhsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzKSkpewojICBwbG90eSA8LSBwYXN0ZTAocGxvdHksICJsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWyIsIGksICJdXSIsICIgKyAiKQojfQoKIyMgcGxvdApsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzFdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbMl1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1szXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzRdXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbNV1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzddXSArIGxpc3RfVU1BUHNfYnlfY2x1c3RlcltbOF1dICsgbGlzdF9VTUFQc19ieV9jbHVzdGVyW1s5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzExXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzEzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE2XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE3XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE4XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzE5XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIwXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIxXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIyXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzIzXV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI0XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI1XV0gKyBsaXN0X1VNQVBzX2J5X2NsdXN0ZXJbWzI2XV0KYGBgCgojIyMgUGljayBmaW5hbCByZXNvbHV0aW9uIAoKV2Ugd2lsbCBsb29rIGluIG1vcmUgZGV0YWlsIGF0IGNlbGxzIGFzIHRoZXkgZW50ZXIgdGhlIHNleHVhbCB0cmFqZWNvdHJ5IGxhdGVyLiBUaGUgUENBIGNsdXN0ZXJpbmcgd2lsbCBiZSBtb3JlIGFwcHJvcHJpYXRlIGluIHRoaXMgaGlnaC1yZXNvbHV0aW9uIHZpZXcuIEluIG9yZGVyIHRvIHN1YnNldCB0aGVzZSBjZWxscywgd2Ugd2lsbCB1c2UgdGhlIFVNQVAgY2x1c3RlcmluZy4gCgpgYGB7ciwgZmlnLmhlaWdodCA9IDMsIGZpZy53aWR0aCA9IDV9CiMjIGdlbmVyYXRlIGZpbmFsIGNsdXN0ZXJzIHdoaWNoIHdpbGwgYmUgd3JpdHRlbiBpbnRvIHRoZSAnc2V1cmF0LmNsdXN0ZXJzJyBzbG90IGluIG1ldGEgZGF0YQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkIDwtIEZpbmROZWlnaGJvcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZGltcyA9IDE6MTAsIHJlZHVjdGlvbiA9ICJ1bWFwIikKdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSBGaW5kQ2x1c3RlcnModGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgcmVzb2x1dGlvbiA9IDAuNSwgcmFuZG9tLnNlZWQgPSA0MiwgYWxnb3JpdGhtID0gMikKCiMjIFBsb3QKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMDUsIGdyb3VwLmJ5ID0gInNldXJhdF9jbHVzdGVycyIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIpICsgY29vcmRfZml4ZWQoKQpgYGAKCiMjIyBjbHVzdGVycyBtZXRyaWNzCgpXZSB3aWxsIGdldCBzb21lIGhpZ2ggbGV2ZWwgaW5zaWdodCBpbnRvIHRoZXNlIGNsdXN0ZXJzIG5vdwoKYGBge3IsIGZpZy5oZWlnaHQgPSAzLCBmaWcud2lkdGggPSA1fQojIyBUT0RPIC0gbW92ZSB0aGlzIHRvIG9uY2UgY2x1c3RlcnMgYXJlIGlkZW50aWZpZWQKdjEgPC0gVmxuUGxvdChvYmplY3QgPSB0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9ICJuRmVhdHVyZV9STkEiLCBncm91cC5ieSA9ICJzZXVyYXRfY2x1c3RlcnMiLCBwdC5zaXplID0gMC4wMSkKCnYyIDwtIFZsblBsb3Qob2JqZWN0ID0gdGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZmVhdHVyZXMgPSAibkNvdW50X1JOQSIsIGdyb3VwLmJ5ID0gInNldXJhdF9jbHVzdGVycyIsIHB0LnNpemUgPSAwLjAxKQoKdjEgKyB2MgpgYGAKCiMgNi4gRGVmaW5lIENsdXN0ZXIgSWRlbnRpdGllcyB7LnRhYnNldH0gCgpXZSBoYXZlIGRlZmluZWQgY2x1c3RlcnMsIG5vdyB3ZSB3aWxsIGlkZW50aWZ5IHdoYXQgdGhlIGNsdXN0ZXJzIGNvcnJlc3BvbmQgdG8uIFdlIGNhbiB1c2UgYSBudW1iZXIgb2YgZXh0ZXJuYWwgZGF0YXNldHMgdG8gZG8gdGhpczoKCmtub3duIG1hcmtlciBnZW5lcyAKCmJ1bGsgUk5BLXNlcSBkYXRhIGNvcnJlbGF0aW9uIAoKIyMjIE1hcmtlciBnZW5lIGV4cHJlc3Npb24KCiMjIyMgZXhwcmVzc2lvbiBvZiA4MjAgbWFya2VycwoKYGBge3IsIGZpZy5oZWlnaHQgPSAzLCBmaWcud2lkdGggPSAzfQojIyBtYWtlIHBsb3RzIApwbG90cyA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9IGMoIlBCQU5LQS0xMzE5NTAwIiwgIlBCQU5LQS0wNDE2MTAwIiksIGJsZW5kID0gVFJVRSwgY29tYmluZSA9IEZBTFNFLCBjb29yZC5maXhlZCA9IFRSVUUsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIpCiAgICAKCiMgR2V0IGp1c3QgdGhlIGNvLWV4cHJlc3Npb24gcGxvdCwgYnVpbHQtaW4gbGVnZW5kIGlzIG1lYW5pbmdsZXNzIGZvciB0aGlzIHBsb3QKI3Bsb3RzW1szXV0gKyBOb0xlZ2VuZCgpICAKCiMgR2V0IGp1c3QgdGhlIGtleQojcGxvdHNbWzRdXSAKCiMgU3RpdGNoIHRoZSBjby1leHByZXNzaW9uIGFuZCBrZXkgcGxvdHMgdG9nZXRoZXIKcGxvdHNbWzNdXSArIE5vTGVnZW5kKCkgKyBwbG90c1tbNF1dL3Bsb3Rfc3BhY2VyKCkgKyBwbG90X2xheW91dCh3aWR0aHMgPSBjKDIsMSkpCmBgYAoKIyMjIyBLbm93biBNYXJrZXIgR2VuZXMgUGxvdHMKCm1hcmtlciBnZW5lcyBwbG90cwpgYGB7ciwgZmlnLmhlaWdodCA9IDYsIGZpZy53aWR0aCA9IDZ9CiMjIGZpbmQgYSBnb29kIHJpbmcgbWFya2VyLCB0byBzZWUgaWYgdGhlcmUgaXMgYSBiZXR0ZXIgb25lIHRoYW4gdGhlIG9uZXMgcmVwb3J0ZWQKI21hcmtlcnNfcmluZyA8LSBGaW5kTWFya2Vycyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBpZGVudC4xID0gYygiNCIsICI1IiwgIjE2IiwgIjExIiwgIjciLCAiMyIsICI5IiwgIjAiLCAiMjIiKSkKI2hlYWQobWFya2Vyc19yaW5nKQoKIyBQQkFOS0EtMTMxOTUwMCAtIENDUDIgLSBmZW1hbGUgLSB1c2VkIGluIDgyMCBsaW5lCiMgUEJBTktBLTA0MTYxMDAgLSBNRzEgLSBkeW5lbmluIGhlYXZ5IGNoYWluIC0gbWFsZSAtIHVzZWQgaW4gODIwIGxpbmUKIyBQQkFOS0EtMTQzNzUwMCAtIEFQMkcgLSBjb21taXRtZW50CiMgUEJBTktBLTA4MzEwMDAgLSBNU1AxIC0gbGF0ZSBhc2V4dWFsCiMgUEJBTktBLTExMDIyMDAgLSBNU1A4IC0gZWFybHkgYXNleHVhbCAoZnJvbSBCb3pkZWNoIHBhcGVyKQojIFBCQU5LQS0wNzExOTAwIC0gSFNQNzAgLSBwcm9tb3RlciB1c2VkIGZvciBHRlAgYW5kIFJGUCBleHByZXNzaW9uIGluIHRoZSBtdXRhbnRzCiMgUEJBTktBLTE0MDA0MDAgLSBGQU1CIC0gcmluZyBtYXJrZXIgLSBkaXNjb3ZlcmVkIGJ5IGxvb2tpbmcgZm9yIG1hcmtlciBnZW5lcyBpbiBkYXRhCiMgUEJBTktBLTA3MjI2MDAgLSBGYW0tYjIgLSByaW5nIG1hcmtlciAtIGh0dHBzOi8vd3d3Lm5jYmkubmxtLm5paC5nb3YvcG1jL2FydGljbGVzL1BNQzUxMTMwMzEvIAoKCm1hcmtlcl9nZW5lX3Bsb3RfQ0NQMiA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9ICJQQkFOS0EtMTMxOTUwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMSIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCJDQ1AyIChGZW1hbGUpIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkKCm1hcmtlcl9nZW5lX3Bsb3RfTUcxIDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGZlYXR1cmVzID0gIlBCQU5LQS0wNDE2MTAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIk1HMSAoTWFsZSkiKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDIwLCBmYWNlID0gImJvbGQiKSkgKyAKICBzY2FsZV9jb2xvdXJfZ3JhZGllbnRuKGNvbG91cnM9YygiI0RDRENEQyIsIHBsYXNtYSgzMCkpKQoKbWFya2VyX2dlbmVfcGxvdF9BUDJHIDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGZlYXR1cmVzID0gIlBCQU5LQS0xNDM3NTAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIkFQMkcgKENvbW1pdG1lbnQpIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkKCm1hcmtlcl9nZW5lX3Bsb3RfTVNQMSA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9ICJQQkFOS0EtMDgzMTAwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMSIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCJNU1AxIChTY2hpem9udCkiKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDIwLCBmYWNlID0gImJvbGQiKSkgKyAKICBzY2FsZV9jb2xvdXJfZ3JhZGllbnRuKGNvbG91cnM9YygiI0RDRENEQyIsIHBsYXNtYSgzMCkpKQoKbWFya2VyX2dlbmVfcGxvdF9NU1A4IDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGZlYXR1cmVzID0gIlBCQU5LQS0xMTAyMjAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIk1TUDggKEFzZXh1YWwpIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkKCm1hcmtlcl9nZW5lX3Bsb3RfU0JQMSA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9ICJQQkFOS0EtMTEwMTMwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMSIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCJTQlAxIChSaW5nKSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpCgptYXJrZXJfZ2VuZV9wbG90X0ZBTUIgPC0gRmVhdHVyZVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZmVhdHVyZXMgPSAiUEJBTktBLTA3MjI2MDAiLCBjb29yZC5maXhlZCA9IFRSVUUsIG1pbi5jdXRvZmYgPSAicTEiLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiLCBwdC5zaXplID0gMSwgb3JkZXIgPSBUUlVFKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiRmFtLWIyIChSaW5nKSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpCgptYXJrZXJfZ2VuZV9wbG90X0hTUDcwIDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGZlYXR1cmVzID0gIlBCQU5LQS0wNzExOTAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIihIU1A3MDsgUmVwb3J0ZXIpIiwiXG4iLCAiUEJBTktBXzA3MTE5MDAiKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDIwLCBmYWNlID0gImJvbGQiKSkgKyAKICBzY2FsZV9jb2xvdXJfZ3JhZGllbnRuKGNvbG91cnM9YygiI0RDRENEQyIsIHBsYXNtYSgzMCkpKQoKIyNvcmlnaW5hbCBsYWJlbDoKIyBsYWJzKHRpdGxlID0gcGFzdGUoIihDQ1AyOyBGZW1hbGUpIiwiXG4iLCAiUEJBTktBXzEzMTk1MDAiKSkKCiMjIHBsb3QKbWFya2VyX2dlbmVfcGxvdF9GQU1CICsgbWFya2VyX2dlbmVfcGxvdF9NU1A4ICsgbWFya2VyX2dlbmVfcGxvdF9NU1AxICsgbWFya2VyX2dlbmVfcGxvdF9BUDJHICsgbWFya2VyX2dlbmVfcGxvdF9DQ1AyICsgbWFya2VyX2dlbmVfcGxvdF9NRzEgKyBtYXJrZXJfZ2VuZV9wbG90X0hTUDcwCmBgYAoKVGhlbiBkZWZpbmUgZWFjaCBjbHVzdGVyIGFzIE1hbGUsIEZlbWFsZSBvciBBc2V4dWFsOgpgYGB7cn0KIyMgY29weSBjbHVzdGVycyB0byBuZXcgY29sdW1uCnRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGNsdXN0ZXJfY29sb3Vyc19maWd1cmUgPC0gTkEKCiMjIGRlZmluZSB3aGljaCBjbHVzdGVycyB3aWxsIGJlIHdoaWNoIGlkZW50aXR5CgptYWxlX2NsdXN0ZXJzIDwtIGMoIjIwIiwgIjE3IiwgIjgiLCAiMTgiKQoKZmVtYWxlX2NsdXN0ZXJzIDwtIGMoIjIzIiwgIjE5IiwgIjIxIiwgIjUiKQoKYXNleF9jbHVzdGVycyA8LSBjKCI2IiwgIjQiLCAiOSIsICIyIiwgIjEiLCAiNyIsICIwIiwgIjMiLCAiMTIiLCAiMTYiLCAiMTAiLCAiMTEiLCAiMjQiLCAiMTQiLCAiMTUiLCAiMjIiLCAiMjUiKQoKYmlwb3RlbnRpYWxfY2x1c3RlcnMgPC0gYygiMTMiKQoKIyMgY2hlY2sgbGVuZ3RoIG9mIHRoZSB1bmlxdWUgZW50cmllcyBpbiB0aGUgbWFudWFseSBjcmVhdGVkIGxpc3QgYWJvdmUgYW5kIHRoZSBudW1iZXIgb2YgY2x1c3RlcnMgaW4gdG90YWwKcGFzdGUoIklzIHRoZSB0b3RhbCBudW1iZXIgb2YgY2x1c3RlcnMgaW4gdGhlIGxpc3QgdGhlIHNhbWUgYXMgdGhlIG51bWJlciBvZiBjbHVzdGVycyBpbiB0aGUgc2xvdD8iLCBpZGVudGljYWwobGVuZ3RoKHVuaXF1ZShjKG1hbGVfY2x1c3RlcnMsIGZlbWFsZV9jbHVzdGVycywgYXNleF9jbHVzdGVycywgYmlwb3RlbnRpYWxfY2x1c3RlcnMpKSksIGxlbmd0aChsZXZlbHModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzKSkpKQoKIyMgY2hhbmdlIHRoZSBjb2x1bW4gSURzCnRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGNsdXN0ZXJfY29sb3Vyc19maWd1cmVbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzICVpbiUgbWFsZV9jbHVzdGVycyldIDwtICJNYWxlIgp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRjbHVzdGVyX2NvbG91cnNfZmlndXJlW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNldXJhdF9jbHVzdGVycyAlaW4lIGZlbWFsZV9jbHVzdGVycyldIDwtICJGZW1hbGUiCnRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGNsdXN0ZXJfY29sb3Vyc19maWd1cmVbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzICVpbiUgYXNleF9jbHVzdGVycyldIDwtICJBc2V4dWFsIgp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRjbHVzdGVyX2NvbG91cnNfZmlndXJlW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNldXJhdF9jbHVzdGVycyAlaW4lIGJpcG90ZW50aWFsX2NsdXN0ZXJzKV0gPC0gIkJpcG90ZW50aWFsIgoKdGFibGUodGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkY2x1c3Rlcl9jb2xvdXJzX2ZpZ3VyZSkKYGBgCgojIDcuIFBsb3QgRmlndXJlcyB7LnRhYnNldH0KCnVzZWZ1bCB0b29scyBmb3IgYWxsIHBsb3RzCmBgYHtyfQojIyBkZWZpbmUgbWFsZSBhbmQgZmVtYWxlIHN5bWJvbApmZW1hbGVfc3ltYm9sIDwtIGludFRvVXRmOCg5NzkyKQptYWxlX3N5bWJvbCA8LSBpbnRUb1V0ZjgoOTc5NCkKYGBgCgoKIyMjIyBGaWcuIDMuQS4gKEFsbCBDZWxscyBieSBNYWxlLCBGZW1hbGUsIE1hbGUpCgpgYGB7ciwgZmlnLmhlaWdodCA9IDQsIGZpZy53aWR0aCA9IDR9CiMjIG1ha2UgYSBjdXN0b20gcGFsCiMgMSA9IGJsdWUgLSAiIzAwNTJjNSIKIyAyID0gcmVkIC0gIiNhNTJiMWUiCiMgMyA9IGdyZWVuIC0gIiMwMTZjMDAiCiMgNCA9IHllbGxvdyAtICIjZmZlNDAwIgpwYWxfc2V4IDwtIGMoIiMwMDUyYzUiLCIjZmZlNDAwIiwgIiNhNTJiMWUiLCAiIzAxNmMwMCIpCgpVTUFQX2lkZW50aXR5IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC41LCBncm91cC5ieSA9ICJjbHVzdGVyX2NvbG91cnNfZmlndXJlIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKwogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcz1wYWxfc2V4KSArIAogIHRoZW1lX3ZvaWQoKSArIAogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikKCiMjIHByaW50ClVNQVBfaWRlbnRpdHkKYGBgCgpzYXZlCmBgYHtyfQpnZ3NhdmUoIi4uL2ltYWdlc190b19leHBvcnQvbWVyZ2VfVU1BUF9pZGVudGl0eS5wbmciLCBwbG90ID0gVU1BUF9pZGVudGl0eSwgZGV2aWNlID0gInBuZyIsIHBhdGggPSBOVUxMLCBzY2FsZSA9IDEsIHdpZHRoID0gMjAsIGhlaWdodCA9IDIwLCB1bml0cyA9ICJjbSIsIGRwaSA9IDMwMCwgbGltaXRzaXplID0gVFJVRSkKYGBgCgojIyMjIEZpZy4gU3VwLiBVTUFQIHdpdGggQ2x1c3RlcnMKCmBgYHtyLCBmaWcuaGVpZ2h0ID0gNCwgZmlnLndpZHRoID0gNH0KIyMgUGxvdAp1bWFwX2NsdXN0ZXIgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IFRSVUUsIGxhYmVsLnNpemUgPSA4LCByZXBlbCA9IEZBTFNFLCBwdC5zaXplID0gMC41LCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKwogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbj0iYm90dG9tIiwgCiAgICAgICAgYXhpcy5saW5lPWVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRleHQueD1lbGVtZW50X2JsYW5rKCksCiAgICAgICAgYXhpcy50ZXh0Lnk9ZWxlbWVudF9ibGFuaygpLAogICAgICAgIGF4aXMudGlja3M9ZWxlbWVudF9ibGFuaygpLAogICAgICAgIGF4aXMudGl0bGUueD1lbGVtZW50X2JsYW5rKCksCiAgICAgICAgYXhpcy50aXRsZS55PWVsZW1lbnRfYmxhbmsoKSkgKyAKICBndWlkZXMoY29sb3VyPWd1aWRlX2xlZ2VuZChucm93ID0gMywgYnlyb3cgPSBUUlVFLCBvdmVycmlkZS5hZXMgPSBsaXN0KHNpemU9NSkpKQoKIyMgcHJpbnQKdW1hcF9jbHVzdGVyCmBgYAoKc2F2ZQpgYGB7cn0KZ2dzYXZlKCIuLi9pbWFnZXNfdG9fZXhwb3J0L21lcmdlX1VNQVBfY2x1c3Rlci5wbmciLCBwbG90ID0gdW1hcF9jbHVzdGVyLCBkZXZpY2UgPSAicG5nIiwgcGF0aCA9IE5VTEwsIHNjYWxlID0gMSwgd2lkdGggPSAyMCwgaGVpZ2h0ID0gMjAsIHVuaXRzID0gImNtIiwgZHBpID0gMzAwLCBsaW1pdHNpemUgPSBUUlVFKQpgYGAKCiMjIyMgRmlnLiAzLkMuIEJ5IGJ1bGsgY29ycmVsYXRpb24KCmBgYHtyfQojIyBtYWtlIHBsb3RzCiMjIGhvbyBkYXRhc2V0IGNvcnJlbGF0aW9uClVNQVBfaG9vIDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBncm91cC5ieSA9ICJQcmVkaWN0aW9uLlNwZWFybWFuLiIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIpICsKICBjb29yZF9maXhlZCgpICsgCiAgdGhlbWVfdm9pZCgpICsKICBsYWJzKHRpdGxlID0gcGFzdGUoIkhvbyBQcmVkaWN0ZWQgVGltZXBvaW50IikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IGluZmVybm8oMTIpKSAgKwogIGxhYnMoY29sb3VyID0gImhvdXIiKSArCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gImJvdHRvbSIsIGxlZ2VuZC50aXRsZT1lbGVtZW50X3RleHQoc2l6ZT0xMCkpCgojIyBhcDJnIHRpbWVjb3Vyc2UgaW4gdGhpcyBwYXBlciBjb3JyZWxhdGlvbgpVTUFQX2thc2lhIDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBncm91cC5ieSA9ICJQcmVkaWN0aW9uLlNwZWFybWFuLl9LYXNpYSIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIpICsKICBjb29yZF9maXhlZCgpICsgCiAgdGhlbWVfdm9pZCgpICsKICBsYWJzKHRpdGxlID0gcGFzdGUoIkFQMkcgVGltZWNvdXJzZSBQcmVkaWN0ZWQgVGltZXBvaW50IikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsKICBzY2FsZV9jb2xvdXJfbWFudWFsKHZhbHVlcyA9IGluZmVybm8oMTApKSAgKwogIGxhYnMoY29sb3VyID0gImhvdXIiKSArCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gImJvdHRvbSIsIGxlZ2VuZC50aXRsZT1lbGVtZW50X3RleHQoc2l6ZT0xMCkpCgojIyBjb21iaW5lCnVtYXBfYnVsayA8LSB3cmFwX3Bsb3RzKFVNQVBfaG9vLCBVTUFQX2thc2lhLCBuY29sID0gMikKCiMjIHByaW50CnVtYXBfYnVsawpgYGAKCmBgYHtyfQpnZ3NhdmUoIi4uL2ltYWdlc190b19leHBvcnQvbWVyZ2VfdW1hcF9idWxrX3ByZWRpY3Rpb24ucG5nIiwgcGxvdCA9IHVtYXBfYnVsaywgZGV2aWNlID0gInBuZyIsIHBhdGggPSBOVUxMLCBzY2FsZSA9IDEsIHdpZHRoID0gMzAsIGhlaWdodCA9IDEwLCB1bml0cyA9ICJjbSIsIGRwaSA9IDMwMCwgbGltaXRzaXplID0gVFJVRSkKYGBgCgojIyMjIEZpZy4gMy5DLiBCeSBFeHBlcmltZW50CgpUaGUgb3JpZ2luYWwgbWV0aG9kIG9mIHBsb3R0aW5nIGJ5IGV4cGVyaW1lbnQgZG9lcyBub3QgYWxsb3cgbXVjaCBjdXN0b21pc2F0aW9uIG9mIHRoZSBwbG90cy4gSS5lLiB3ZSBjYW5ub3QgZWFzaWx5IGNoYW5nZSB0aGUgdGl0bGVzIG9mIGVhY2ggcGxvdApgYGB7ciwgZmlnLmhlaWdodCA9IDQsIGZpZy53aWR0aCA9IDR9CiMjIFBsb3QKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuNSwgc3BsaXQuYnkgPSAiZXhwZXJpbWVudCIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIpICsgCiAgY29vcmRfZml4ZWQoKSArCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uPSJib3R0b20iLCBheGlzLmxpbmU9ZWxlbWVudF9ibGFuaygpLGF4aXMudGV4dC54PWVsZW1lbnRfYmxhbmsoKSwKICAgICAgICAgIGF4aXMudGV4dC55PWVsZW1lbnRfYmxhbmsoKSxheGlzLnRpY2tzPWVsZW1lbnRfYmxhbmsoKSwKICAgICAgICAgIGF4aXMudGl0bGUueD1lbGVtZW50X2JsYW5rKCksCiAgICAgICAgICBheGlzLnRpdGxlLnk9ZWxlbWVudF9ibGFuaygpKQpgYGAKCkJ1dCwgd2UgY2FuIHVzZSB0aGUgZm9sbG93aW5nIGNvZGUgdG8gZG8gdGhpcwpgYGB7ciwgZmlnLmhlaWdodCA9IDIsIGZpZy53aWR0aCA9IDR9CiMjIG1ha2UgYW4gZXh0cmEgbWV0YS5kYXRhIGNvbHVtbiBzbyB5b3UgY2FuIHNwbGl0IHRoZSBvYmplY3QgYnkgU1MyIG11dGFudCwgU1MyIFdULCAxMFgKIyMgbWFrZSBuZXcgY29sdW1uIGluIG1ldGEuZGF0YQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRzdWJfZ2Vub3R5cGUgPC0gdGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkZ2Vub3R5cGUKCiMjIHJlcGxhY2UgTkEgdmFsdWVzIGZyb20gMTBYIGRhdGEgd2l0aCBhIHZhbHVlCnRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHN1Yl9nZW5vdHlwZVtpcy5uYSh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRzdWJfZ2Vub3R5cGUpXSA8LSAiMTBYX1dUIgoKIyMgY2hlY2sKdGFibGUodGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc3ViX2dlbm90eXBlKQoKIyMgc3BsaXQgc2V1cmF0IG9iamVjdCB1cApvYi5saXN0IDwtIFNwbGl0T2JqZWN0KHRlbngubXV0YW50LmludGVncmF0ZWQsIHNwbGl0LmJ5ID0gInN1Yl9nZW5vdHlwZSIpCgojIyBtYWtlIHBsb3RzIGZvciBlYWNoIG9iamVjdApwbG90Lmxpc3QgPC0gbGFwcGx5KFggPSBvYi5saXN0LCBGVU4gPSBmdW5jdGlvbih4KSB7CiAgICBEaW1QbG90KHgsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGxhYmVsID0gRkFMU0UsIGxhYmVsLnNpemUgPSA1LCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAxKSArIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbj0iYm90dG9tIikKfSkKCiMjIHVzZSB0aGlzIGZ1bmN0aW9uIHRvIGV4dHJhY3QgbGVnZW5kOgojIyBzb3VyY2U6IGh0dHBzOi8vc3RhY2tvdmVyZmxvdy5jb20vcXVlc3Rpb25zLzEzNjQ5NDczL2FkZC1hLWNvbW1vbi1sZWdlbmQtZm9yLWNvbWJpbmVkLWdncGxvdHMKIyMgc291cmNlOiBodHRwczovL2dpdGh1Yi5jb20vaGFkbGV5L2dncGxvdDIvd2lraS9TaGFyZS1hLWxlZ2VuZC1iZXR3ZWVuLXR3by1nZ3Bsb3QyLWdyYXBocwpnX2xlZ2VuZDwtZnVuY3Rpb24oYS5ncGxvdCl7CiAgIHRtcCA8LSBnZ3Bsb3RfZ3RhYmxlKGdncGxvdF9idWlsZChhLmdwbG90KSkKICAgbGVnIDwtIHdoaWNoKHNhcHBseSh0bXAkZ3JvYnMsIGZ1bmN0aW9uKHgpIHgkbmFtZSkgPT0gImd1aWRlLWJveCIpCiAgIGxlZ2VuZCA8LSB0bXAkZ3JvYnNbW2xlZ11dCiAgIHJldHVybihsZWdlbmQpfQoKIyMgbWFrZSBwbG90cyBwcmV0dHkKcDEgPC0gcGxvdC5saXN0JGAxMFhfV1RgICsgdGhlbWVfdm9pZCgpICsgZ3VpZGVzKGNvbG91cj1ndWlkZV9sZWdlbmQobnJvdz0yLGJ5cm93PVRSVUUsIG92ZXJyaWRlLmFlcyA9IGxpc3Qoc2l6ZT00KSkpCnAyIDwtIHBsb3QubGlzdCRXVCArIHRoZW1lX3ZvaWQoKQpwMyA8LSBwbG90Lmxpc3QkTXV0YW50ICsgdGhlbWVfdm9pZCgpCgojIyBnZXQgbGVnZW5kCm15bGVnZW5kPC1nX2xlZ2VuZChwMSkKCiMjIG1ha2UgYSBmaW5hbCBwbG90CnA0IDwtIGdyaWQuYXJyYW5nZShhcnJhbmdlR3JvYihwMSArIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbj0ibm9uZSIpICsgbGFicyh0aXRsZSA9IHBhc3RlKCIxMFgiLCAiXG4iLCAiKHdpbGQtdHlwZSkiKSkgKyB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41KSksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwMiArIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbj0ibm9uZSIpICsgbGFicyh0aXRsZSA9IHBhc3RlKCJTbWFydC1zZXEyIiwgIlxuIiwgIih3aWxkLXR5cGUpIikpICsgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSkpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcDMgKyB0aGVtZShsZWdlbmQucG9zaXRpb249Im5vbmUiKSArIGxhYnModGl0bGUgPSBwYXN0ZSgiU21hcnQtc2VxMiIsICJcbiIsICIobXV0YW50KSIpKSArIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUpKSwgbnJvdz0xKSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG15bGVnZW5kLCBucm93PTIsaGVpZ2h0cz1jKDEwLCAxKSkKYGBgCgpNYWtlIGZpbmFsIHBsb3RzOgpgYGB7ciwgZmlnLmhlaWdodCA9IDEwLCBmaWcud2lkdGggPSAxMH0KcDEgPC0gcGxvdC5saXN0JGAxMFhfV1RgICsgCiAgY29vcmRfZml4ZWQoKSArCiAgdGhlbWVfdm9pZCgpICsKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMocmVwbGljYXRlKDQ1LCAiIzk5OTk5OSIpKSkgKwogIGxhYnModGl0bGUgPSBwYXN0ZSgiMTBYICh3aWxkLXR5cGUpIikpICsKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIsIHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKQoKcDIgPC0gcGxvdC5saXN0JFdUICsKICBjb29yZF9maXhlZCgpICsKICB0aGVtZV92b2lkKCkgKwogIHNjYWxlX2NvbG9yX21hbnVhbCh2YWx1ZXM9YyhyZXBsaWNhdGUoNDYsICIjOTk5OTk5IikpKSArCiAgbGFicyh0aXRsZSA9IHBhc3RlKCJTbWFydC1zZXEyICh3aWxkLXR5cGUpIikpICsKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIsIHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKQoKcDMgPC0gcGxvdC5saXN0JE11dGFudCArCiAgY29vcmRfZml4ZWQoKSArCiAgdGhlbWVfdm9pZCgpICsKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMocmVwbGljYXRlKDQ2LCAiIzk5OTk5OSIpKSkgKwogIGxhYnModGl0bGUgPSBwYXN0ZSgiU21hcnQtc2VxMiAobXV0YW50KSIpKSArCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiLCBwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDIwLCBmYWNlID0gImJvbGQiKSkKCnAxICsgcDIgKyBwMwpgYGAKCmBgYHtyLCBmaWcuaGVpZ2h0ID0gMTAsIGZpZy53aWR0aCA9IDEwfQojIyBtYWtlIGNvbXBvc2l0ZSBwbG90ClVNQVBfY29tcG9zaXRlIDwtIHdyYXBfcGxvdHMobWFya2VyX2dlbmVfcGxvdF9GQU1CICwgbWFya2VyX2dlbmVfcGxvdF9NU1A4ICwgbWFya2VyX2dlbmVfcGxvdF9NU1AxICwgbWFya2VyX2dlbmVfcGxvdF9BUDJHICwgbWFya2VyX2dlbmVfcGxvdF9DQ1AyICwgbWFya2VyX2dlbmVfcGxvdF9NRzEgLCBwMSAsIHAyICwgcDMsIG5jb2wgPSAzKQoKIyMgcHJpbnQKVU1BUF9jb21wb3NpdGUKYGBgCnNhdmUKYGBge3J9Cmdnc2F2ZSgiLi4vaW1hZ2VzX3RvX2V4cG9ydC9tZXJnZV91bWFwX3RlY2hub2xvZ3lfYW5kX21hcmtlcnMucG5nIiwgcGxvdCA9IFVNQVBfY29tcG9zaXRlLCBkZXZpY2UgPSAicG5nIiwgcGF0aCA9IE5VTEwsIHNjYWxlID0gMSwgd2lkdGggPSAzMCwgaGVpZ2h0ID0gMzAsIHVuaXRzID0gImNtIiwgZHBpID0gMzAwLCBsaW1pdHNpemUgPSBUUlVFKQpgYGAKClNwZWNpZmljIGdlbmUgZXhwcmVzc2lvbiBvZiBtdXRhbnRzCmBgYHtyfQojIFBCQU5LQS0xNDE4MTAwICAgICAgICBHQ1NLTy0xNyAgRkQzICAgCiMgUEJBTktBLTAxMDI0MDAgICAgICAgICBHQ1NLTy0yICBNRDMgCiMgUEJBTktBLTA3MTY1MDAgICAgICAgIEdDU0tPLTE5ICBNRDQgCiMgUEJBTktBLTE0MzUyMDAgICAgICAgIEdDU0tPLTIwICBGRDQgCiMgUEJBTktBLTA5MDIzMDAgICAgICAgIEdDU0tPLTEzICBGRDIKIyBQQkFOS0EtMDQxMzQwMCAgICBHQ1NLTy0xMF84MjAgIE1ENQojIFBCQU5LQS0wODI4MDAwICAgICAgICAgR0NTS08tMyAgR0QxCiMgUEJBTktBLTEzMDI3MDAgICAgICAgR0NTS08tb29tICBNRDEgCiMgUEJBTktBLTE0NDc5MDAgICAgICAgIEdDU0tPLTI5ICBNRDIKIyBQQkFOS0EtMTQ1NDgwMCAgICAgICAgR0NTS08tMjEgIEZEMQojIFBCQU5LQS0xMTQ0ODAwICAgICAgICBHQ1NLTy0yOCAgRkQ1CgoKbWFya2VyX2dlbmVfcGxvdF8xNyA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiLCBmZWF0dXJlcyA9ICJQQkFOS0EtMTQxODEwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMTAiLCBtYXguY3V0b2ZmID0gInE5NSIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCIxNyIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgptYXJrZXJfZ2VuZV9wbG90XzIgPC0gRmVhdHVyZVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgZmVhdHVyZXMgPSAiUEJBTktBLTAxMDI0MDAiLCBjb29yZC5maXhlZCA9IFRSVUUsIG1pbi5jdXRvZmYgPSAicTEwIiwgbWF4LmN1dG9mZiA9ICJxOTUiLCBwdC5zaXplID0gMSwgb3JkZXIgPSBUUlVFKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiMiIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgptYXJrZXJfZ2VuZV9wbG90XzE5IDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGZlYXR1cmVzID0gIlBCQU5LQS0wNzE2NTAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExMCIsIG1heC5jdXRvZmYgPSAicTk1IiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIjE5IikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkgKwogICMjIGFkZCBzZXggc3ltYm9scwogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDMuOCwgeSA9IDEuNSwgbGFiZWwgPSBtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpICsgCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMiwgeSA9IDIuOCwgbGFiZWwgPSBmZW1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikKCm1hcmtlcl9nZW5lX3Bsb3RfMjAgPC0gRmVhdHVyZVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgZmVhdHVyZXMgPSAiUEJBTktBLTE0MzUyMDAiLCBjb29yZC5maXhlZCA9IFRSVUUsIG1pbi5jdXRvZmYgPSAicTEwIiwgbWF4LmN1dG9mZiA9ICJxOTUiLCBwdC5zaXplID0gMSwgb3JkZXIgPSBUUlVFKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiMjAiKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDIwLCBmYWNlID0gImJvbGQiKSkgKyAKICBzY2FsZV9jb2xvdXJfZ3JhZGllbnRuKGNvbG91cnM9YygiI0RDRENEQyIsIHBsYXNtYSgzMCkpKSArCiAgIyMgYWRkIHNleCBzeW1ib2xzCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMy44LCB5ID0gMS41LCBsYWJlbCA9IG1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikgKyAKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAyLCB5ID0gMi44LCBsYWJlbCA9IGZlbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKQoKbWFya2VyX2dlbmVfcGxvdF8xMyA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiLCBmZWF0dXJlcyA9ICJQQkFOS0EtMDkwMjMwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMTAiLCBtYXguY3V0b2ZmID0gInE5NSIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCIxMyIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgptYXJrZXJfZ2VuZV9wbG90XzEwIDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGZlYXR1cmVzID0gIlBCQU5LQS0wNDEzNDAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExMCIsIG1heC5jdXRvZmYgPSAicTk1IiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIjEwIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkgKwogICMjIGFkZCBzZXggc3ltYm9scwogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDMuOCwgeSA9IDEuNSwgbGFiZWwgPSBtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpICsgCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMiwgeSA9IDIuOCwgbGFiZWwgPSBmZW1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikKCm1hcmtlcl9nZW5lX3Bsb3RfMyA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiLCBmZWF0dXJlcyA9ICJQQkFOS0EtMDgyODAwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMTAiLCBtYXguY3V0b2ZmID0gInE5NSIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCIzIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkgKwogICMjIGFkZCBzZXggc3ltYm9scwogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDMuOCwgeSA9IDEuNSwgbGFiZWwgPSBtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpICsgCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMiwgeSA9IDIuOCwgbGFiZWwgPSBmZW1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikKCm1hcmtlcl9nZW5lX3Bsb3Rfb29tIDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGZlYXR1cmVzID0gIlBCQU5LQS0xMzAyNzAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExMCIsIG1heC5jdXRvZmYgPSAicTk1IiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIm9vbSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgptYXJrZXJfZ2VuZV9wbG90XzI5IDwtIEZlYXR1cmVQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGZlYXR1cmVzID0gIlBCQU5LQS0xNDQ3OTAwIiwgY29vcmQuZml4ZWQgPSBUUlVFLCBtaW4uY3V0b2ZmID0gInExMCIsIG1heC5jdXRvZmYgPSAicTk1IiwgcHQuc2l6ZSA9IDEsIG9yZGVyID0gVFJVRSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIjI5IikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAyMCwgZmFjZSA9ICJib2xkIikpICsgCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50bihjb2xvdXJzPWMoIiNEQ0RDREMiLCBwbGFzbWEoMzApKSkgKwogICMjIGFkZCBzZXggc3ltYm9scwogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDMuOCwgeSA9IDEuNSwgbGFiZWwgPSBtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpICsgCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMiwgeSA9IDIuOCwgbGFiZWwgPSBmZW1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikKCm1hcmtlcl9nZW5lX3Bsb3RfMjEgPC0gRmVhdHVyZVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIiwgZmVhdHVyZXMgPSAiUEJBTktBLTE0NTQ4MDAiLCBjb29yZC5maXhlZCA9IFRSVUUsIG1pbi5jdXRvZmYgPSAicTEwIiwgbWF4LmN1dG9mZiA9ICJxOTUiLCBwdC5zaXplID0gMSwgb3JkZXIgPSBUUlVFKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiMjEiKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDIwLCBmYWNlID0gImJvbGQiKSkgKyAKICBzY2FsZV9jb2xvdXJfZ3JhZGllbnRuKGNvbG91cnM9YygiI0RDRENEQyIsIHBsYXNtYSgzMCkpKSArCiAgIyMgYWRkIHNleCBzeW1ib2xzCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMy44LCB5ID0gMS41LCBsYWJlbCA9IG1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikgKyAKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAyLCB5ID0gMi44LCBsYWJlbCA9IGZlbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKQoKbWFya2VyX2dlbmVfcGxvdF8yOCA8LSBGZWF0dXJlUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiLCBmZWF0dXJlcyA9ICJQQkFOS0EtMTE0NDgwMCIsIGNvb3JkLmZpeGVkID0gVFJVRSwgbWluLmN1dG9mZiA9ICJxMTAiLCBtYXguY3V0b2ZmID0gInE5NSIsIHB0LnNpemUgPSAxLCBvcmRlciA9IFRSVUUpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCIyOCIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMjAsIGZhY2UgPSAiYm9sZCIpKSArIAogIHNjYWxlX2NvbG91cl9ncmFkaWVudG4oY29sb3Vycz1jKCIjRENEQ0RDIiwgcGxhc21hKDMwKSkpICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgojI29yaWdpbmFsIGxhYmVsOgojIGxhYnModGl0bGUgPSBwYXN0ZSgiKENDUDI7IEZlbWFsZSkiLCJcbiIsICJQQkFOS0FfMTMxOTUwMCIpKQoKIyMgbWFrZSBjb21wb3NpdGUgcGxvdAptdXRhbnRfZXhwcmVzc2lvbl9jb21wb3NpdGUgPC0gd3JhcF9wbG90cyhtYXJrZXJfZ2VuZV9wbG90XzE3ICwgbWFya2VyX2dlbmVfcGxvdF8yICwgbWFya2VyX2dlbmVfcGxvdF8xOSAsIG1hcmtlcl9nZW5lX3Bsb3RfMjAgLCBtYXJrZXJfZ2VuZV9wbG90XzEzICwgbWFya2VyX2dlbmVfcGxvdF8xMCAsIG1hcmtlcl9nZW5lX3Bsb3RfMyAsIG1hcmtlcl9nZW5lX3Bsb3Rfb29tICwgbWFya2VyX2dlbmVfcGxvdF8yOSAsIG1hcmtlcl9nZW5lX3Bsb3RfMjEgLCBtYXJrZXJfZ2VuZV9wbG90XzI4LCBuY29sID0gNCkKICAgICAgICAgICAKIyMgcHJpbnQKbXV0YW50X2V4cHJlc3Npb25fY29tcG9zaXRlCmBgYAoKc2F2ZQpgYGB7cn0KZ2dzYXZlKCIuLi9pbWFnZXNfdG9fZXhwb3J0L21lcmdlX3VtYXBfbXV0YW50X2dlbmVfZXhwcmVzc2lvbi5wbmciLCBwbG90ID0gbXV0YW50X2V4cHJlc3Npb25fY29tcG9zaXRlLCBkZXZpY2UgPSAicG5nIiwgcGF0aCA9IE5VTEwsIHNjYWxlID0gMSwgd2lkdGggPSAzMCwgaGVpZ2h0ID0gMzAsIHVuaXRzID0gImNtIiwgZHBpID0gMzAwLCBsaW1pdHNpemUgPSBUUlVFKQpgYGAKCiMjIyMgRmlnLiBTdXAuIExvb2sgYXQgc3BlY2lmaWMgbXV0YW50cwoKQWxsIHRoZSBtdXRhbnQgZ2Vub3R5cGVzIHByb2ZpbGVkIHdlcmU6CmBgYHtyfQojIyBtYWtlIGEgbGlzdCBvZiBwb3NzaWJsZSBnZW5vdHlwZXMKdW5pcXVlKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGlkZW50aXR5X3VwZGF0ZWQpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDcsIGZpZy5sZW5ndGggPSA3fQojIyB+IFRPRE8gfiBNQUtFIElOVE8gQSBGT1IgTE9PUAoKIyMgbWFrZSBsaXN0cyBmb3IgZWFjaCBnZW5vdHlwZQpjZWxsc18xNyA8LSByb3duYW1lcyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YVt3aGljaCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpZGVudGl0eV91cGRhdGVkID09ICJHQ1NLTy0xNyIpLCBdKQpjZWxsc18yIDwtIHJvd25hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGlkZW50aXR5X3VwZGF0ZWQgPT0gIkdDU0tPLTIiKSwgXSkKY2VsbHNfMTkgPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCA9PSAiR0NTS08tMTkiKSwgXSkKY2VsbHNfMjAgPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCA9PSAiR0NTS08tMjAiKSwgXSkKY2VsbHNfMTMgPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCA9PSAiR0NTS08tMTMiKSwgXSkKY2VsbHNfMTAgPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCA9PSAiR0NTS08tMTBfODIwIiksIF0pCmNlbGxzXzMgPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCA9PSAiR0NTS08tMyIpLCBdKQpjZWxsc19vb20gPC0gcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGFbd2hpY2godGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCA9PSAiR0NTS08tb29tIiksIF0pCmNlbGxzXzI5IDwtIHJvd25hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGlkZW50aXR5X3VwZGF0ZWQgPT0gIkdDU0tPLTI5IiksIF0pCmNlbGxzXzIxIDwtIHJvd25hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGlkZW50aXR5X3VwZGF0ZWQgPT0gIkdDU0tPLTIxIiksIF0pCmNlbGxzXzI4IDwtIHJvd25hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhW3doaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGlkZW50aXR5X3VwZGF0ZWQgPT0gIkdDU0tPLTI4IiksIF0pCgojIyBtYWtlIHBsb3RzCnBtMSA8LSBEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGxhYmVsID0gRkFMU0UsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMSwgY2VsbHMuaGlnaGxpZ2h0ID0gY2VsbHNfMjgsIGdyb3VwLmJ5ID0gImV4Y2x1ZGVfZm9yX3NleF9yYXRpbyIsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIpICsgCiAgY29vcmRfZml4ZWQoKSArIAogIHNjYWxlX2NvbG9yX21hbnVhbCh2YWx1ZXM9YygiIzAwMDAwMCIsICIjZjU0ZTFlIikpICsgCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCJNdXRhbnQgMjgiLCJcbiIsICIoUEJBTktBXzExNDQ4MDApIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAxNSwgZmFjZSA9ICJib2xkIiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgpwbTIgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IGNlbGxzXzE3LCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiTXV0YW50IDE3IiwiXG4iLCAiKFBCQU5LQV8xNDE4MTAwKSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMTUsIGZhY2UgPSAiYm9sZCIpLCBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpICArCiAgIyMgYWRkIHNleCBzeW1ib2xzCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMy44LCB5ID0gMS41LCBsYWJlbCA9IG1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikgKyAKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAyLCB5ID0gMi44LCBsYWJlbCA9IGZlbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKQoKcG0zIDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBjZWxsc18yLCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiTXV0YW50IDIiLCJcbiIsICIoUEJBTktBXzAxMDI0MDApIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAxNSwgZmFjZSA9ICJib2xkIiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgpwbTQgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IGNlbGxzXzE5LCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArCiAgdGhlbWVfdm9pZCgpICsgCiAgbGFicyh0aXRsZSA9IHBhc3RlKCJNdXRhbnQgMTkiLCJcbiIsICIoUEJBTktBXzA3MTY1MDApIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAxNSwgZmFjZSA9ICJib2xkIiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgpwbTUgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IGNlbGxzXzIwLCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiTXV0YW50IDIwIiwiXG4iLCAiKFBCQU5LQV8xNDM1MjAwKSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMTUsIGZhY2UgPSAiYm9sZCIpLCBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpICArCiAgIyMgYWRkIHNleCBzeW1ib2xzCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMy44LCB5ID0gMS41LCBsYWJlbCA9IG1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikgKyAKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAyLCB5ID0gMi44LCBsYWJlbCA9IGZlbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKQoKcG02IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBjZWxsc18xMywgZ3JvdXAuYnkgPSAiZXhjbHVkZV9mb3Jfc2V4X3JhdGlvIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKyAKICBjb29yZF9maXhlZCgpICsgCiAgc2NhbGVfY29sb3JfbWFudWFsKHZhbHVlcz1jKCIjMDAwMDAwIiwgIiNmNTRlMWUiKSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIk11dGFudCAxMyIsIlxuIiwgIlBCQU5LQV8wOTAyMzAwIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAxNSwgZmFjZSA9ICJib2xkIiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgpwbTcgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IGNlbGxzXzEwLCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiTXV0YW50IDEwIiwiXG4iLCAiKFBCQU5LQV8wNDEzNDAwKSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMTUsIGZhY2UgPSAiYm9sZCIpLCBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpICArCiAgIyMgYWRkIHNleCBzeW1ib2xzCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMy44LCB5ID0gMS41LCBsYWJlbCA9IG1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikgKyAKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAyLCB5ID0gMi44LCBsYWJlbCA9IGZlbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKQoKcG04IDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBjZWxsc18zLCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiTXV0YW50IDMiLCJcbiIsICIoUEJBTktBXzA4MjgwMDApIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAxNSwgZmFjZSA9ICJib2xkIiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgpwbTkgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IGNlbGxzX29vbSwgZ3JvdXAuYnkgPSAiZXhjbHVkZV9mb3Jfc2V4X3JhdGlvIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKyAKICBjb29yZF9maXhlZCgpICsgCiAgc2NhbGVfY29sb3JfbWFudWFsKHZhbHVlcz1jKCIjMDAwMDAwIiwgIiNmNTRlMWUiKSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIk11dGFudCBvb20iLCJcbiIsICIoUEJBTktBXzEzMDI3MDApIikpICsgCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwgZmFtaWx5PSJBcmlhbCIsIHNpemUgPSAxNSwgZmFjZSA9ICJib2xkIiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgICsKICAjIyBhZGQgc2V4IHN5bWJvbHMKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAzLjgsIHkgPSAxLjUsIGxhYmVsID0gbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKSArIAogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDIsIHkgPSAyLjgsIGxhYmVsID0gZmVtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpCgpwbTEwIDwtIERpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgbGFiZWwgPSBGQUxTRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4xLCBjZWxscy5oaWdobGlnaHQgPSBjZWxsc18yOSwgZ3JvdXAuYnkgPSAiZXhjbHVkZV9mb3Jfc2V4X3JhdGlvIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKyAKICBjb29yZF9maXhlZCgpICsgCiAgc2NhbGVfY29sb3JfbWFudWFsKHZhbHVlcz1jKCIjMDAwMDAwIiwgIiNmNTRlMWUiKSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICBsYWJzKHRpdGxlID0gcGFzdGUoIk11dGFudCAyOSIsIlxuIiwgIihQQkFOS0FfMTQ0NzkwMCkiKSkgKyAKICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41LCBmYW1pbHk9IkFyaWFsIiwgc2l6ZSA9IDE1LCBmYWNlID0gImJvbGQiKSwgbGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiKSAgKwogICMjIGFkZCBzZXggc3ltYm9scwogIGFubm90YXRlKCJ0ZXh0IiwgeCA9IDMuOCwgeSA9IDEuNSwgbGFiZWwgPSBtYWxlX3N5bWJvbCwgc2l6ZT03LCBjb2xvcj0iZ3JheSIpICsgCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMiwgeSA9IDIuOCwgbGFiZWwgPSBmZW1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikKCnBtMTEgPC0gRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IGNlbGxzXzIxLCBncm91cC5ieSA9ICJleGNsdWRlX2Zvcl9zZXhfcmF0aW8iLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIAogIGNvb3JkX2ZpeGVkKCkgKyAKICBzY2FsZV9jb2xvcl9tYW51YWwodmFsdWVzPWMoIiMwMDAwMDAiLCAiI2Y1NGUxZSIpKSArIAogIHRoZW1lX3ZvaWQoKSArIAogIGxhYnModGl0bGUgPSBwYXN0ZSgiTXV0YW50IDIxIiwiXG4iLCAiKFBCQU5LQV8xNDU0ODAwKSIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUsIGZhbWlseT0iQXJpYWwiLCBzaXplID0gMTUsIGZhY2UgPSAiYm9sZCIpLCBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpICArCiAgIyMgYWRkIHNleCBzeW1ib2xzCiAgYW5ub3RhdGUoInRleHQiLCB4ID0gMy44LCB5ID0gMS41LCBsYWJlbCA9IG1hbGVfc3ltYm9sLCBzaXplPTcsIGNvbG9yPSJncmF5IikgKyAKICBhbm5vdGF0ZSgidGV4dCIsIHggPSAyLCB5ID0gMi44LCBsYWJlbCA9IGZlbWFsZV9zeW1ib2wsIHNpemU9NywgY29sb3I9ImdyYXkiKQoKIyMgcGxvdCBjb21wb3NpdGUgcGxvdAojIyBub3QgdXNlZCBhcyBvdXRzaWRlIHBsb3RzIGhhdmUgb2RkIHNpemVzCiNwbTEgKyBwbTIgKyBwbTQgKyBwbTUgKyBwbTExICsgcG03ICsgcG02ICsgcG04ICsgcG05ICsgcG0xMCArIHBtMwoKIyMgcGxvdCBjb21wb3NpdGUgcGxvdAptdXRhbnRfY2VsbF9sb2NhdGlvbnMgPC0gcGxvdF9ncmlkKHBtMSArIHRoZW1lKHBsb3QubWFyZ2luID0gdW5pdChjKDAsIDAsIDAsIDApLCAiY20iKSksIHBtMiArIHRoZW1lKHBsb3QubWFyZ2luID0gdW5pdChjKDAsIDAsIDAsIDApLCAiY20iKSksIHBtNCArIHRoZW1lKHBsb3QubWFyZ2luID0gdW5pdChjKDAsIDAsIDAsIDApLCAiY20iKSksIHBtNSArIHRoZW1lKHBsb3QubWFyZ2luID0gdW5pdChjKDAsIDAsIDAsIDApLCAiY20iKSksIHBtMTEgKyB0aGVtZShwbG90Lm1hcmdpbiA9IHVuaXQoYygwLCAwLCAwLCAwKSwgImNtIikpLCBwbTcgKyB0aGVtZShwbG90Lm1hcmdpbiA9IHVuaXQoYygwLCAwLCAwLCAwKSwgImNtIikpLCBwbTYgKyB0aGVtZShwbG90Lm1hcmdpbiA9IHVuaXQoYygwLCAwLCAwLCAwKSwgImNtIikpLCBwbTggKyB0aGVtZShwbG90Lm1hcmdpbiA9IHVuaXQoYygwLCAwLCAwLCAwKSwgImNtIikpLCBwbTkgKyB0aGVtZShwbG90Lm1hcmdpbiA9IHVuaXQoYygwLCAwLCAwLCAwKSwgImNtIikpLCBwbTEwICsgdGhlbWUocGxvdC5tYXJnaW4gPSB1bml0KGMoMCwgMCwgMCwgMCksICJjbSIpKSwgcG0zKyB0aGVtZShwbG90Lm1hcmdpbiA9IHVuaXQoYygwLCAwLCAwLCAwKSwgImNtIikpLCBucm93ID0gMykKCiMjIHByaW50Cm11dGFudF9jZWxsX2xvY2F0aW9ucwpgYGAKCnNhdmUKYGBge3J9Cmdnc2F2ZSgiL1VzZXJzL0FuZHkvR0NTS08vR0NTS09fYW5hbHlzaXNfZ2l0L2ltYWdlc190b19leHBvcnQvbWVyZ2VfdW1hcF9tdXRhbnRfY2VsbF9sb2NhdGlvbnMucG5nIiwgcGxvdCA9IG11dGFudF9jZWxsX2xvY2F0aW9ucywgZGV2aWNlID0gInBuZyIsIHBhdGggPSBOVUxMLCBzY2FsZSA9IDEsIHdpZHRoID0gMzAsIGhlaWdodCA9IDMwLCB1bml0cyA9ICJjbSIsIGRwaSA9IDMwMCwgbGltaXRzaXplID0gVFJVRSkKYGBgCgojIyMgRmlndXJlLiBTdXAuIERvdCBQbG90IEZpZ3VyZXMKCiMjIyMgRXhwcmVzc2lvbiBvZiBNYXJrZXIgR2VuZXMgYnkgQ2x1c3RlcgoKV2Ugd2lsbCB1c2UgdGhlIGZvbGxvd2luZyBtYXJrZXIgZ2VuZXM6CmBgYHtyfQojIFBCQU5LQS0xMzE5NTAwIC0gQ0NQMiAtIGZlbWFsZSAtIHVzZWQgaW4gODIwIGxpbmUKIyBQQkFOS0EtMDQxNjEwMCAtIE1HMSAtIGR5bmVuaW4gaGVhdnkgY2hhaW4gLSBtYWxlIC0gdXNlZCBpbiA4MjAgbGluZQojIFBCQU5LQS0wODMxMDAwIC0gTVNQMSAtIGxhdGUgYXNleHVhbAojIFBCQU5LQS0xMTAyMjAwIC0gTVNQOCAtIGVhcmx5IGFzZXh1YWwgKGZyb20gQm96ZGVjaCBwYXBlcikKIyBQQkFOS0EtMTQzNzUwMCAtIEFQMkcgLSBjb21taXRtZW50CmBgYAoKcGxvdCBleHByZXNzaW9uIG9mIHRoZXNlIG1hcmtlciBnZW5lcyBpbiBlYWNoIGNsdXN0ZXIKYGBge3IsIGZpZy53aWR0aCA9IDUsIGZpZy5oZWlnaHQ9IDd9CiMjIGNvcHkgdGhlIGNsdXN0ZXJzIHNvIHlvdSBkb24ndCBwZXJtYW5lbnRseSBlZGl0IHRoZSBtYXN0ZXIKdGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzX3Bsb3R0aW5nIDwtIHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNldXJhdF9jbHVzdGVycwoKIyMgcmVvcmRlciB0aGUgbGV2ZWxzIHNvIHlvdSBjYW4gcGxvdCB0aGUgY2x1dGVycyBhcyB5b3Ugd2lzaApteV9sZXZlbHMgPC0gYyhhc2V4X2NsdXN0ZXJzLCBiaXBvdGVudGlhbF9jbHVzdGVycywgbWFsZV9jbHVzdGVycywgZmVtYWxlX2NsdXN0ZXJzKQoKIyMgcmVvcmRlciB0aGUgbGV2ZWxzCnRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNldXJhdF9jbHVzdGVyc19wbG90dGluZyA8LSBmYWN0b3IoeCA9IHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNldXJhdF9jbHVzdGVyc19wbG90dGluZywgbGV2ZWxzID0gbXlfbGV2ZWxzKQoKIyMgcGxvdApkb3RfcGxvdF9tYXJrZXJzIDwtIERvdFBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgZmVhdHVyZXMgPSBjKCJQQkFOS0EtMTMxOTUwMCIsICJQQkFOS0EtMDQxNjEwMCIsICJQQkFOS0EtMTQzNzUwMCIsICJQQkFOS0EtMDgzMTAwMCIsICJQQkFOS0EtMTEwMjIwMCIpLCBncm91cC5ieSA9ICJzZXVyYXRfY2x1c3RlcnNfcGxvdHRpbmciKSArCiAgdGhlbWVfY2xhc3NpYygpICsKICAjIGNoYW5nZSBhcHBlYXJhbmNlIGFuZCByZW1vdmUgYXhpcyBlbGVtZW50cywgYW5kIG1ha2Ugcm9vbSBmb3IgYXJyb3dzCiAgdGhlbWUoYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoc2l6ZT0xNiwgYW5nbGUgPSA0NSwgaGp1c3Q9MSx2anVzdD0xLCBmYW1pbHkgPSAiQXJpYWwiKSwgdGV4dD1lbGVtZW50X3RleHQoc2l6ZT0xNiwgZmFtaWx5PSJBcmlhbCIpLCBsZWdlbmQucG9zaXRpb24gPSAiYm90dG9tIiwgbGVnZW5kLmRpcmVjdGlvbiA9ICJob3Jpem9udGFsIiwgbGVnZW5kLmJveCA9ICJ2ZXJ0aWNhbCIsIHBsb3QudGl0bGUgPSBlbGVtZW50X2JsYW5rKCksIHBsb3QubWFyZ2luID0gdW5pdChjKDEsMywxLDMpLCAibGluZXMiKSkgKwogICNjaGFuZ2UgdGhlIGNvbG91cnMKICBzY2FsZV9jb2xvdXJfdmlyaWRpcyhvcHRpb24gPSAiaW5mZXJubyIsIGd1aWRlID0gImNvbG91cmJhciIsIG5hLnZhbHVlPSJ3aGl0ZSIsIGJlZ2luID0gMCwgZW5kID0gMSwgZGlyZWN0aW9uID0gMSkgKwogICMjIGNoYW5nZSB4IGF4aXMgbGFiZWwKICBsYWJzKHggPSAiTWFya2VyIEdlbmVzIiwgeSA9ICJDbHVzdGVyIiwgdGl0bGUgPSAiRXhwcmVzc2lvbiBvZiBNYXJrZXIgR2VuZXMgYnkgQ2x1c3RlciIpICsKICAjIyBhZGQgYXJyb3dzCiAgI2Fubm90YXRlKCJzZWdtZW50IiwgeCA9IDUuNSwgeGVuZCA9IDUuNSwgeSA9IDIxLjUsIHllbmQgPSAyNSwgY29sb3VyID0gImdyZWVuIiwgc2l6ZT0xLCBhbHBoYT0xLCBhcnJvdz1hcnJvdyhsZW5ndGg9dW5pdCgwLjMwLCJjbSIpLCB0eXBlID0gImNsb3NlZCIpKSArCiAgI2Fubm90YXRlKCJzZWdtZW50IiwgeCA9IDUuNSwgeGVuZCA9IDUuNSwgeSA9IDE2LjUsIHllbmQgPSAyMS41LCBjb2xvdXIgPSAicmVkIiwgc2l6ZT0xLCBhbHBoYT0xLCBhcnJvdz1hcnJvdyhsZW5ndGg9dW5pdCgwLjMwLCJjbSIpLCB0eXBlID0gImNsb3NlZCIpKSArCiAgI2Fubm90YXRlKCJzZWdtZW50IiwgeCA9IDUuNSwgeGVuZCA9IDUuNSwgeSA9IDAsIHllbmQgPSAxNS41LCBjb2xvdXIgPSAiZ3JleSIsIHNpemU9MSwgYWxwaGE9MSwgYXJyb3c9YXJyb3cobGVuZ3RoPXVuaXQoMC4zMCwiY20iKSwgdHlwZSA9ICJjbG9zZWQiKSkgKwogICMjIGFubm90YXRlIG1hbGVzCiAgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IDI4LjUpKSArCiAgIyMgYW5ub3RhdGUgZmVtYWxlcwogIGdlb21faGxpbmUoYWVzKHlpbnRlcmNlcHQgPSAyNC41KSkgKwogICMjIGFubm90YXRlIGhlcm1hcGhyb2RpdGUKICBnZW9tX2hsaW5lKGFlcyh5aW50ZXJjZXB0ID0gMjMuNSkpICsKICAjIyBjaGFuZ2UgbGFiZWwgb24gYm90dG9tIG9mIHBsb3Qgc28gd2UgY2FuIGluZGljYXRlIG1hcmtlcnMKICBzY2FsZV94X2Rpc2NyZXRlKGxhYmVscyA9IGMocGFzdGUoIlBCQU5LQS0xMTAyMjAwIiwiXG4iLCAiKE1TUDg7IGVhcmx5IGFzZXh1YWwpIiksIHBhc3RlKCJQQkFOS0EtMDgzMTAwMCIsIlxuIiwgIihNU1AxOyBsYXRlIGFzZXh1YWwpIiksIHBhc3RlKCJQQkFOS0EtMTQzNzUwMCIsICJcbiIsICIoQVAyRzsgc2V4dWFsIGNvbW1pdG1lbnQpIiksIHBhc3RlKCJQQkFOS0EtMDQxNjEwMCIsICJcbiIsICIoTUcxOyBtYWxlKSIpLCBwYXN0ZSgiUEJBTktBLTEzMTk1MDAiLCAiXG4iLCAiKENDUDI7IGZlbWFsZSkiKSkpCgojIyB2aWV3CnByaW50KGRvdF9wbG90X21hcmtlcnMpCmBgYAoKIyMjIyBFeHByZXNzaW9uIG9mIHRoZSBtdXRhbnQgZ2VuZXMgYnkgY2x1c3RlcgoKZ2VuZSBpZGVudGl0aWVzIGZvciB0aGUgbXV0YW50cyBwcm9maWxlZApgYGB7cn0KIyBHQ1NLTy0zCVBCQU5LQV8wODI4MDAwCiMgR0NTS08tb29tCVBCQU5LQV8xMzAyNzAwCiMgR0NTS08tMjkJUEJBTktBXzE0NDc5MDAKIyBHQ1NLTy0yCVBCQU5LQV8wMTAyNDAwCiMgR0NTS08tMTkJUEJBTktBXzA3MTY1MDAKIyBHQ1NLTy0yMAlQQkFOS0FfMTQzNTIwMAojIEdDU0tPLTE3CVBCQU5LQV8xNDE4MTAwCiMgR0NTS08tMjgJUEJBTktBXzExNDQ4MDAKIyBHQ1NLTy0xMwlQQkFOS0FfMDkwMjMwMAojIEdDU0tPLTEwXzgyMAlQQkFOS0FfMDQxMzQwMF84MjAKIyBHQ1NLTy0yMQlQQkFOS0FfMTQ1NDgwMApgYGAKCnBsb3QgZXhwcmVzc2lvbiBvZiB0aGVzZSBtdXRhbnQgZ2VuZXMgYnkgY2x1c3RlcgpgYGB7ciwgZmlnLndpZHRoID0gNSwgZmlnLmhlaWdodD0gN30KIyMgcGxvdApkb3RfcGxvdF9tdXRhbnRfZ2VuZXMgPC0gRG90UGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9IGMoIlBCQU5LQS0wODI4MDAwIiwgIlBCQU5LQS0xMzAyNzAwIiwgIlBCQU5LQS0xNDQ3OTAwIiwgIlBCQU5LQS0wMTAyNDAwIiwgIlBCQU5LQS0wNzE2NTAwIiwgIlBCQU5LQS0xNDM1MjAwIiwgIlBCQU5LQS0xNDE4MTAwIiwgIlBCQU5LQS0xMTQ0ODAwIiwgIlBCQU5LQS0wOTAyMzAwIiwgIlBCQU5LQS0wNDEzNDAwIiwgIlBCQU5LQS0xNDU0ODAwIiksIGdyb3VwLmJ5ID0gInNldXJhdF9jbHVzdGVyc19wbG90dGluZyIpICsKICB0aGVtZV9jbGFzc2ljKCkgKwogICMjIGNoYW5nZSBhcHBlYXJhbmNlIGFuZCByZW1vdmUgYXhpcyBlbGVtZW50cywgYW5kIG1ha2Ugcm9vbSBmb3IgYXJyb3dzLCBhbmQgYWxzbyBjaGFuZ2UgcG9zb2l0aW9uIG9mIGxlZ2VuZHMgcmVsYXRpdmUgdG8gb25lIGFub3RoZXIKICB0aGVtZShheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChzaXplPTEyLCBhbmdsZSA9IDQ1LCBoanVzdD0xLHZqdXN0PTEpLCBsZWdlbmQucG9zaXRpb24gPSAiYm90dG9tIiwgbGVnZW5kLmRpcmVjdGlvbiA9ICJob3Jpem9udGFsIiwgbGVnZW5kLmJveCA9ICJ2ZXJ0aWNhbCIsIHBsb3QubWFyZ2luID0gdW5pdChjKDEsMywxLDMpLCAibGluZXMiKSwgdGV4dD1lbGVtZW50X3RleHQoc2l6ZT0xNiwgZmFtaWx5PSJBcmlhbCIpKSArCiAgIyNhZGQgdGhlc2UgdG8gYWJvdmUgdG8gcmVtb3ZlIHkgPSBwbG90LnRpdGxlID0gZWxlbWVudF9ibGFuaygpLCBheGlzLnRleHQueSA9IGVsZW1lbnRfYmxhbmsoKSwgYXhpcy50aWNrcy55ID0gZWxlbWVudF9ibGFuaygpLCBheGlzLnRpdGxlLnkgPSBlbGVtZW50X2JsYW5rKCkKICAjIyBjaGFuZ2UgdGhlIGNvbG91cnMKICBzY2FsZV9jb2xvdXJfdmlyaWRpcyhvcHRpb24gPSAiaW5mZXJubyIsIGd1aWRlID0gImNvbG91cmJhciIsIG5hLnZhbHVlPSJ3aGl0ZSIsIGJlZ2luID0gMCwgZW5kID0gMSwgZGlyZWN0aW9uID0gMSkgKwogICMjIGNoYW5nZSB4IGF4aXMgbGFiZWwKICBsYWJzKHggPSAiTXV0YW50IEdlbmVzIiwgIHRpdGxlID0gIkV4cHJlc3Npb24gb2YgbXV0YW50IGdlbmVzIGJ5IGNsdXN0ZXIiLCB5ID0gIkNsdXN0ZXIiKSArCiAgIyMgYW5ub3RhdGUgbWFsZXMKICBnZW9tX2hsaW5lKGFlcyh5aW50ZXJjZXB0ID0gMjguNSkpICsKICAjIyBhbm5vdGF0ZSBmZW1hbGVzCiAgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IDI0LjUpKSArCiAgIyMgYW5ub3RhdGUgaGVybWFwaHJvZGl0ZQogIGdlb21faGxpbmUoYWVzKHlpbnRlcmNlcHQgPSAyMy41KSkgKwogICMjIGNoYW5nZSBsYWJlbCBvbiBib3R0b20gb2YgcGxvdCBzbyB3ZSBjYW4gaW5kaWNhdGUgbWFya2VycwogIHNjYWxlX3hfZGlzY3JldGUobGFiZWxzID0gYyhwYXN0ZSgiUEJBTktBXzE0NTQ4MDAiLCJcbiIsICIoR0NTS08gMjEpIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHBhc3RlKCJQQkFOS0EtMDQxMzQwMCIsIlxuIiwgIihHQ1NLTyAxMCkiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0wOTAyMzAwIiwgIlxuIiwgIihHQ1NLTyAxMykiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0xMTQ0ODAwIiwgIlxuIiwgIihHQ1NLTyAyOCkiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0xNDE4MTAwIiwgIlxuIiwgIihHQ1NLTyAxNykiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0xNDM1MjAwIiwgIlxuIiwgIihHQ1NLTyAyMCkiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0wNzE2NTAwIiwgIlxuIiwgIihHQ1NLTyAxOSkiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0wMTAyNDAwIiwgIlxuIiwgIihHQ1NLTyAyKSIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwYXN0ZSgiUEJBTktBLTE0NDc5MDAiLCAiXG4iLCAiKEdDU0tPIDI5KSIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwYXN0ZSgiUEJBTktBLTEzMDI3MDAiLCAiXG4iLCAiKEdDU0tPIG9vbSkiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFzdGUoIlBCQU5LQS0wODI4MDAwIiwgIlxuIiwgIihHQ1NLTyAzKSIpKSkKCiMjIHZpZXcKcHJpbnQoZG90X3Bsb3RfbXV0YW50X2dlbmVzKQpgYGAKCiMjIyMgUmVwcmVzZW50YXRpb24gb2YgRXhwZXJpbWVudCBieSBDbHVzdGVyCgptYWtlIGEgbWV0YWRhdGEgY29sdW1uIHdoZXJlIHRoZSAxMFggZGF0YSBpcyBjbGFzc2lmaWVkIGFzIGEgV1QgZ2Vub3R5cGUKYGBge3J9CiMjIGdldCBjZWxscyB0aGF0IGFyZSBmaWx0ZXJlZCBvdXQKY2VsbHNfMTB4IDwtIHdoaWNoKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGV4cGVyaW1lbnQgPT0gInRlbnhfNWsiKQoKIyMgbWFrZSBleHRyYSBjb2x1bW4gaW4gcGxvdHRpbmcgZGYKdGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkZ2Vub3R5cGVfY29tYmluZWQgPC0gdGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkZ2Vub3R5cGUKdGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkZ2Vub3R5cGVfY29tYmluZWRbY2VsbHNfMTB4XSA8LSAiV1QiCgojIyBpbnNwZWN0CnRhYmxlKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGdlbm90eXBlX2NvbWJpbmVkKQpgYGAKClBsb3QgZXhwcmVzc2lvbiBvZiBtdXRhbnQgZ2VuZXMgYnkgY2x1c3RlciAod2hpY2ggaXMgc3ViZGl2aWRlZCBieSBnZW5vdHlwZSkKClRoaXMgaXMga2luZCBvZiBhIGNvbnRyb2wgYmVjYXVzZSB0aGUgbXV0YW50IHNob3VsZCBleHByZXNzIGxlc3Mgb2YgdGhlIGdlbmUgb2YgaW50ZXJlc3QgYXQgc29tZSBwb2ludCBkdWUgdG8gdGhlIGluY2x1c2lvbiBvZiB0aGUgbXV0YW50IGNlbGxzCmBgYHtyLCBmaWcud2lkdGggPSA3LCBmaWcuaGVpZ2h0PSAxMn0KIyMgcGxvdApkb3RfcGxvdF9tdXRhbnRfZ2VuZXNfZ2Vub3R5cGUgPC0gRG90UGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmZWF0dXJlcyA9IGMoIlBCQU5LQS0wODI4MDAwIiwgIlBCQU5LQS0xMzAyNzAwIiwgIlBCQU5LQS0xNDQ3OTAwIiwgIlBCQU5LQS0wMTAyNDAwIiwgIlBCQU5LQS0wNzE2NTAwIiwgIlBCQU5LQS0xNDM1MjAwIiwgIlBCQU5LQS0xNDE4MTAwIiwgIlBCQU5LQS0xMTQ0ODAwIiwgIlBCQU5LQS0wOTAyMzAwIiwgIlBCQU5LQS0wNDEzNDAwIiwgIlBCQU5LQS0xNDU0ODAwIiksIGdyb3VwLmJ5ID0gInNldXJhdF9jbHVzdGVyc19wbG90dGluZyIsIHNwbGl0LmJ5ID0gImdlbm90eXBlX2NvbWJpbmVkIikgKwogICMjIG1ha2UgYXBwZWFyYW5jZSBzbW9vdGhlcgogIHRoZW1lX2NsYXNzaWMoKSArCiAgIyMgY2hhbmdlIGFwcGVhcmFuY2UgYW5kIHJlbW92ZSBheGlzIGVsZW1lbnRzLCBhbmQgbWFrZSByb29tIGZvciBhcnJvd3MKICB0aGVtZShheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChzaXplPTEyLCBhbmdsZSA9IDQ1LCBoanVzdD0xLHZqdXN0PTEpLCBsZWdlbmQucG9zaXRpb24gPSAiYm90dG9tIiwgcGxvdC50aXRsZSA9IGVsZW1lbnRfYmxhbmsoKSwgcGxvdC5tYXJnaW4gPSB1bml0KGMoMSwzLDEsMSksICJsaW5lcyIpKSArCiAgIyMgY2hhbmdlIHRoZSBjb2xvdXJzCiAgI3NjYWxlX2NvbG91cl92aXJpZGlzKG9wdGlvbiA9ICJpbmZlcm5vIiwgZ3VpZGUgPSAiY29sb3VyYmFyIiwgbmEudmFsdWU9IndoaXRlIiwgYmVnaW4gPSAwLCBlbmQgPSAxLCBkaXJlY3Rpb24gPSAxKSArCiAgIyMgY2hhbmdlIHggYXhpcyBsYWJlbAogIGxhYnMoeCA9ICJNYXJrZXIgR2VuZXMiKSArCiAgIyMgYW5ub3RhdGUgbWFsZXMKICBnZW9tX2hsaW5lKGFlcyh5aW50ZXJjZXB0ID0gNTYuNSkpICsKICAjIyBhbm5vdGF0ZSBmZW1hbGVzCiAgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IDQ4LjUpKSArCiAgIyMgYW5ub3RhdGUgaGVybWFwaHJvZGl0ZQogIGdlb21faGxpbmUoYWVzKHlpbnRlcmNlcHQgPSA0Ni41KSkKICAjIyBjaGFuZ2UgbGFiZWwgb24gYm90dG9tIG9mIHBsb3Qgc28gd2UgY2FuIGluZGljYXRlIG1hcmtlcnMKICAjc2NhbGVfeF9kaXNjcmV0ZShsYWJlbHMgPSBjKHBhc3RlKCJQQkFOS0EtMTEwMjIwMCIsIlxuIiwgIihNU1A4OyBlYXJseSBhc2V4dWFsKSIpLCBwYXN0ZSgiUEJBTktBLTA4MzEwMDAiLCJcbiIsICIoTVNQMTsgbGF0ZSBhc2V4dWFsKSIpLCBwYXN0ZSgiUEJBTktBLTE0Mzc1MDAiLCAiXG4iLCAiKEFQMkc7IHNleHVhbCBjb21taXRtZW50KSIpLCBwYXN0ZSgiUEJBTktBLTA0MTYxMDAiLCAiXG4iLCAiKE1HMTsgbWFsZSkiKSwgcGFzdGUoIlBCQU5LQS0xMzE5NTAwIiwgIlxuIiwgIihDQ1AyOyBmZW1hbGUpIikpKQoKIyMgdmlldwpwcmludChkb3RfcGxvdF9tdXRhbnRfZ2VuZXNfZ2Vub3R5cGUpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDcsIGZpZy5oZWlnaHQ9IDEyfQojIyBwbG90CmRvdF9wbG90X211dGFudHNfZXhwZXJpbWVudCA8LSBEb3RQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGZlYXR1cmVzID0gYygiUEJBTktBLTA4MjgwMDAiLCAiUEJBTktBLTEzMDI3MDAiLCAiUEJBTktBLTE0NDc5MDAiLCAiUEJBTktBLTAxMDI0MDAiLCAiUEJBTktBLTA3MTY1MDAiLCAiUEJBTktBLTE0MzUyMDAiLCAiUEJBTktBLTE0MTgxMDAiLCAiUEJBTktBLTExNDQ4MDAiLCAiUEJBTktBLTA5MDIzMDAiLCAiUEJBTktBLTA0MTM0MDAiLCAiUEJBTktBLTE0NTQ4MDAiKSwgZ3JvdXAuYnkgPSAic2V1cmF0X2NsdXN0ZXJzX3Bsb3R0aW5nIiwgc3BsaXQuYnkgPSAic3ViX2dlbm90eXBlIiwgY29scyA9IGMoInJlZCIsICJibHVlIiwgImdyZWVuIikpICsKICB0aGVtZV9jbGFzc2ljKCkgKwogICMgY2hhbmdlIGFwcGVhcmFuY2UgYW5kIHJlbW92ZSBheGlzIGVsZW1lbnRzLCBhbmQgbWFrZSByb29tIGZvciBhcnJvd3MKICB0aGVtZShheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChzaXplPTEyLCBhbmdsZSA9IDQ1LCBoanVzdD0xLHZqdXN0PTEpLCBsZWdlbmQucG9zaXRpb24gPSAiYm90dG9tIiwgcGxvdC50aXRsZSA9IGVsZW1lbnRfYmxhbmsoKSwgcGxvdC5tYXJnaW4gPSB1bml0KGMoMSwzLDEsMSksICJsaW5lcyIpKSArCiAgI2NoYW5nZSB0aGUgY29sb3VycwogICNzY2FsZV9jb2xvdXJfdmlyaWRpcyhvcHRpb24gPSAiaW5mZXJubyIsIGd1aWRlID0gImNvbG91cmJhciIsIG5hLnZhbHVlPSJ3aGl0ZSIsIGJlZ2luID0gMCwgZW5kID0gMSwgZGlyZWN0aW9uID0gMSkgKwogICMjIGNoYW5nZSB4IGF4aXMgbGFiZWwKICBsYWJzKHggPSAiTWFya2VyIEdlbmVzIikgKwogICMjIGFubm90YXRlIG1hbGVzCiAgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IDc3KSkgKwogICMjIGFubm90YXRlIGZlbWFsZXMKICBnZW9tX2hsaW5lKGFlcyh5aW50ZXJjZXB0ID0gNjEpKSArCiAgIyMgYW5ub3RhdGUgaGVybWFwaHJvZGl0ZQogIGdlb21faGxpbmUoYWVzKHlpbnRlcmNlcHQgPSA1OSkpCiAgIyMgY2hhbmdlIGxhYmVsIG9uIGJvdHRvbSBvZiBwbG90IHNvIHdlIGNhbiBpbmRpY2F0ZSBtYXJrZXJzCiAgI3NjYWxlX3hfZGlzY3JldGUobGFiZWxzID0gYyhwYXN0ZSgiUEJBTktBLTExMDIyMDAiLCJcbiIsICIoTVNQODsgZWFybHkgYXNleHVhbCkiKSwgcGFzdGUoIlBCQU5LQS0wODMxMDAwIiwiXG4iLCAiKE1TUDE7IGxhdGUgYXNleHVhbCkiKSwgcGFzdGUoIlBCQU5LQS0xNDM3NTAwIiwgIlxuIiwgIihBUDJHOyBzZXh1YWwgY29tbWl0bWVudCkiKSwgcGFzdGUoIlBCQU5LQS0wNDE2MTAwIiwgIlxuIiwgIihNRzE7IG1hbGUpIiksIHBhc3RlKCJQQkFOS0EtMTMxOTUwMCIsICJcbiIsICIoQ0NQMjsgZmVtYWxlKSIpKSkKCiMjIHZpZXcKcHJpbnQoZG90X3Bsb3RfbXV0YW50c19leHBlcmltZW50KQpgYGAKCiMjIyMgUmVwcmVzZW50YXRpb24gb2YgbXV0YW50cyBpbiBtYXJrZXJzCgpBZGQgYSBtZXRhLmRhdGEgY29sdW1uIHNvIHRoYXQgMTBYIGlzIGxpc3RlZCBhcyBXVDoKYGBge3J9CiMjIGdldCBjZWxscyB0aGF0IGFyZSBmaWx0ZXJlZCBvdXQKbXV0YW50X2NlbGxzIDwtIHdoaWNoKHRlbngubXV0YW50LmludGVncmF0ZWQkZXhwZXJpbWVudCA9PSAibXV0YW50cyIpCgojIyBtYWtlIGV4dHJhIGNvbHVtbiBpbiBwbG90dGluZyBkZgp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpZGVudGl0eV9jb21iaW5lZCA8LSAiV1RfMTBYIgp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSRpZGVudGl0eV9jb21iaW5lZFttdXRhbnRfY2VsbHNdIDwtIHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJGlkZW50aXR5X3VwZGF0ZWRbbXV0YW50X2NlbGxzXQpgYGAKCnByZXBhcmUgZGF0YSBmb3IgZG90cGxvdHRpbmcKYGBge3J9CiMjIG1ha2UgYSBkYXRhZnJhbWUgdGhhdCBpcyBhIGNvcHkgb2YgdGhlIG1ldGEgZGF0YQpkZl9tZXRhX2RhdGEgPC0gYXMuZGF0YS5mcmFtZSh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkQG1ldGEuZGF0YSkKCiMjIHJlZGVmaW5lIG9yZGVyIG9mIGNsdXN0ZXJzOgpkZl9tZXRhX2RhdGEkc2V1cmF0X2NsdXN0ZXJzIDwtIGZhY3Rvcih4ID0gZGZfbWV0YV9kYXRhJHNldXJhdF9jbHVzdGVycywgbGV2ZWxzID0gbXlfbGV2ZWxzKQoKIyMgbWFrZSBhIG5ldyBkZiBvZiBDTFVTVEVSIGFuZCBJREVOVElUWQpkb3RfcGxvdF9kZiA8LSBhcy5kYXRhLmZyYW1lLm1hdHJpeCh0YWJsZShkZl9tZXRhX2RhdGEkc2V1cmF0X2NsdXN0ZXJzLCBkZl9tZXRhX2RhdGEkaWRlbnRpdHlfY29tYmluZWQpKQpkb3RfcGxvdF9kZiRjbHVzdGVyIDwtIHJvd25hbWVzKGRvdF9wbG90X2RmKQoKIyMgY2FsY3VsYXRlIHBlcmNlbnRhZ2Ugb2YgY2VsbHMgZm9yIGVhY2ggZ2Vub3R5cGUKZG90X3Bsb3RfZGZfcGMgPC0gKGFzLmRhdGEuZnJhbWUubWF0cml4KHByb3AudGFibGUodGFibGUoZGZfbWV0YV9kYXRhJHNldXJhdF9jbHVzdGVycywgZGZfbWV0YV9kYXRhJGlkZW50aXR5X2NvbWJpbmVkKSwgbWFyZ2luID0gMikpICogMTAwKQoKIyMgbWFrZSBhIGNvbHVtbiBmb3IgY2x1c3RlciBuYW1lcwpkb3RfcGxvdF9kZl9wYyRjbHVzdGVyIDwtIHJvd25hbWVzKGRvdF9wbG90X2RmX3BjKQoKIyMgbWVsdCBkYXRhZnJhbWUgZm9yIHBsb3R0aW5nCmxpYnJhcnkocmVzaGFwZTIpCmRvdF9wbG90X2RmX3BjX21lbHRlZCA8LSBtZWx0KGRvdF9wbG90X2RmX3BjLCB2YXJpYWJsZS5uYW1lID0gImNsdXN0ZXIiKQpjb2xuYW1lcyhkb3RfcGxvdF9kZl9wY19tZWx0ZWQpWzJdIDwtICJpZGVudGl0eSIKCiMjIG1lbHQgdGhlIHJhdyBudW1iZXIgdG9vCmRvdF9wbG90X2RmX21lbHRlZCA8LSBtZWx0KGRvdF9wbG90X2RmLCB2YXJpYWJsZS5uYW1lID0gImNsdXN0ZXIiKQpjb2xuYW1lcyhkb3RfcGxvdF9kZl9tZWx0ZWQpWzJdIDwtICJpZGVudGl0eSIKY29sbmFtZXMoZG90X3Bsb3RfZGZfbWVsdGVkKVszXSA8LSAicmF3X251bWJlciIKCiMjIG1lcmdlIHRvZ2V0aGVyCmlkZW50aWNhbChkb3RfcGxvdF9kZl9tZWx0ZWQkY2x1c3RlciwgZG90X3Bsb3RfZGZfcGNfbWVsdGVkJGNsdXN0ZXIpCmRvdF9wbG90X21lcmdlZCA8LSBjYmluZChkb3RfcGxvdF9kZl9tZWx0ZWQsIGRvdF9wbG90X2RmX3BjX21lbHRlZCkKZG90X3Bsb3RfbWVyZ2VkIDwtIGRvdF9wbG90X21lcmdlZFssYygxLDIsMyw2KV0KCiMjIHJlZGVmaW5lIG9yZGVyIG9mIGNsdXN0ZXJzCmRvdF9wbG90X21lcmdlZCRjbHVzdGVyIDwtIGZhY3Rvcih4ID0gZG90X3Bsb3RfbWVyZ2VkJGNsdXN0ZXIsIGxldmVscyA9IG15X2xldmVscykKCiMjIHdoZXJlIHZhbHVlcyBhcmUgemVybywgYWRkIE5BCiMjIGZpbmQgd2VsbHMgd2hlcmUgaXQncyB6ZXJvCnplcm9fdmFsdWVzIDwtIGRvdF9wbG90X21lcmdlZCR2YWx1ZSA9PSAwCmRvdF9wbG90X21lcmdlZCR2YWx1ZVt6ZXJvX3ZhbHVlc10gPC0gTkEKCiMjIGFsc28gZG8gZm9yIHJhdyBudW1iZXIKemVyb192YWx1ZXMgPC0gZG90X3Bsb3RfbWVyZ2VkJHJhd19udW1iZXIgPT0gMApkb3RfcGxvdF9tZXJnZWQkcmF3X251bWJlclt6ZXJvX3ZhbHVlc10gPC0gTkEKCiMjIHJlb3JkZXIgeCBheGlzOgpteV9sZXZlbHNfZ2Vub3R5cGUgPC0gYygiR0NTS08tb29tIiwgIkdDU0tPLTI5IiwgIkdDU0tPLTMiLCAiR0NTS08tMiIsICJHQ1NLTy0xOSIsICJHQ1NLTy0yOCIsICJHQ1NLTy0yMSIsICJHQ1NLTy0xMyIsICJHQ1NLTy0xNyIsICJHQ1NLTy0yMCIsICJHQ1NLTy0xMF84MjAiLCAiV1QiLCAiV1RfMTBYIikKCmRvdF9wbG90X21lcmdlZCRpZGVudGl0eSA8LSBmYWN0b3IoeCA9IGRvdF9wbG90X2RmX3BjX21lbHRlZCRpZGVudGl0eSwgbGV2ZWxzID0gbXlfbGV2ZWxzX2dlbm90eXBlKQpgYGAKCnBsb3QKYGBge3IsIGZpZy53aWR0aCA9IDcsIGZpZy5oZWlnaHQ9IDd9CmRvdF9wbG90X2lkZW50aXR5IDwtIGdncGxvdChkb3RfcGxvdF9tZXJnZWQsIGFlcyh5ID0gZmFjdG9yKGNsdXN0ZXIpLCB4ID0gZmFjdG9yKGlkZW50aXR5KSkpICsKICAgICAgIyMgbWFrZSBpbnRvIGEgZG90IHBsb3QKICAgICAgZ2VvbV9wb2ludChhZXMoY29sb3VyPXZhbHVlLCBzaXplPXJhd19udW1iZXIpKSArIAogICAgICBzY2FsZV9jb2xvcl9ncmFkaWVudChsb3c9ImJsdWUiLCBoaWdoPSJyZWQiLCBsaW1pdHM9YyggMCwgbWF4KGRvdF9wbG90X2RmX3BjX21lbHRlZCR2YWx1ZSkpLCBuYS52YWx1ZT0id2hpdGUiKSArCiAgICAgICNjaGFuZ2UgdGhlIGNvbG91cnMKICAgICAgc2NhbGVfY29sb3VyX3ZpcmlkaXMob3B0aW9uID0gImluZmVybm8iLCBndWlkZSA9ICJjb2xvdXJiYXIiLCBuYS52YWx1ZT0id2hpdGUiKSArCiAgICAgIHRoZW1lX2NsYXNzaWMoKSArCiAgICAgIHRoZW1lKHBhbmVsLmdyaWQubWFqb3I9ZWxlbWVudF9ibGFuaygpLCBwYW5lbC5ncmlkLm1pbm9yPWVsZW1lbnRfYmxhbmsoKSkgKwogICAgICB5bGFiKCJDbHVzdGVyIikgKwogICAgICB4bGFiKCJJZGVudGl0eSIpICsKICAgICAgbGFicyhjb2xvdXIgPSAiJSBjZWxscyBvZiB0aGF0IGdlbm90eXBlIHJlcHJlc2VudGVkIGluIHRoYXQgY2x1c3RlciIsIHNpemUgPSAibnVtYmVyIG9mIGNlbGxzIG9mIHRoYXQgZ2Vub3R5cGUgcmVwcmVzZW50ZWQgaW4gdGhhdCBjbHVzdGVyIikgKwogICAgICB0aGVtZShheGlzLnRleHQueD1lbGVtZW50X3RleHQoc2l6ZT0xMiwgYW5nbGU9NDUsIGhqdXN0PTEsIHZqdXN0PTEpLCBheGlzLnRleHQueT1lbGVtZW50X3RleHQoc2l6ZT0xMiksIGxlZ2VuZC5wb3NpdGlvbiA9ICJib3R0b20iLCBsZWdlbmQuZGlyZWN0aW9uID0gImhvcml6b250YWwiLCBsZWdlbmQuYm94ID0gInZlcnRpY2FsIiwgdGV4dD1lbGVtZW50X3RleHQoc2l6ZT0xNiwgIGZhbWlseT0iQXJpYWwiKSkgKwogICMjIGFubm90YXRlIG1hbGVzCiAgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IDI4LjUpKSArCiAgIyMgYW5ub3RhdGUgZmVtYWxlcwogIGdlb21faGxpbmUoYWVzKHlpbnRlcmNlcHQgPSAyNC41KSkgKwogICMjIGFubm90YXRlIGhlcm1hcGhyb2RpdGUKICBnZW9tX2hsaW5lKGFlcyh5aW50ZXJjZXB0ID0gMjMuNSkpIAoKI3RpdGxlID0gIiUgZ2Vub3R5cGUgcG9wdWxhdGlvbiBmb3VuZCBpbiBlYWNoIGNsdXN0ZXIiLCAKCnByaW50KGRvdF9wbG90X2lkZW50aXR5KQpgYGAKCm1heWJlIHRoZSByZXNwcmVzZW50YXRpb24gZGlmZmVyZW5jZXMgaGF2ZSBiYXRjaC1lZmZlY3RzOgpgYGB7cn0KI3RhYmxlKHRlbngubXV0YW50LmludGVncmF0ZWRAbWV0YS5kYXRhJHNvcnRfZGF0ZSwgdGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEkaWRlbnRpdHlfdXBkYXRlZCkKYGBgCgojIyMjIENvbXBvc2UgRmluYWwgUGxvdApgYGB7ciwgZmlnLndpZHRoID0gMTQsIGZpZy5oZWlnaHQgPSAxMn0KZG90X3Bsb3RfaWRlbnRpdHkgKyBkb3RfcGxvdF9tYXJrZXJzICsgZG90X3Bsb3RfbXV0YW50X2dlbmVzCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDcsIGZpZy5oZWlnaHQ9IDEyfQojIyBwbG90CmRvdF9wbG90X3BhcGVyX2ZpZ3VyZSA8LSBEb3RQbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmZWF0dXJlcyA9IHJldihjKCJQQkFOS0EtMTE0NDgwMCIsICJQQkFOS0EtMTQzNTIwMCIsICJQQkFOS0EtMTQxODEwMCIsICJQQkFOS0EtMDkwMjMwMCIsICJQQkFOS0EtMTQ1NDgwMCIsICJQQkFOS0EtMDgyODAwMCIsICJQQkFOS0EtMDQxMzQwMCIsICJQQkFOS0EtMDcxNjUwMCIsICJQQkFOS0EtMDEwMjQwMCIsICJQQkFOS0EtMTQ0NzkwMCIsICJQQkFOS0EtMTMwMjcwMCIsICJQQkFOS0EtMTQzNzUwMCIsICJQQkFOS0EtMDQxNjEwMCIsICJQQkFOS0EtMTMwMDcwMCIsICJQQkFOS0EtMDkxNTAwMCIsICJQQkFOS0EtMTQ0MzMwMCIsICJQQkFOS0EtMTE0NTkwMCIpKSwgZ3JvdXAuYnkgPSAic2V1cmF0X2NsdXN0ZXJzX3Bsb3R0aW5nIikgKwogIHRoZW1lX2NsYXNzaWMoKSArCiAgIyMgY2hhbmdlIGFwcGVhcmFuY2UgYW5kIHJlbW92ZSBheGlzIGVsZW1lbnRzLCBhbmQgbWFrZSByb29tIGZvciBhcnJvd3MsIGFuZCBhbHNvIGNoYW5nZSBwb3NvaXRpb24gb2YgbGVnZW5kcyByZWxhdGl2ZSB0byBvbmUgYW5vdGhlcgogIHRoZW1lKGF4aXMudGV4dC54ID0gZWxlbWVudF90ZXh0KHNpemU9MTIsIGFuZ2xlID0gNDUsIGhqdXN0PTEsdmp1c3Q9MSksIGxlZ2VuZC5wb3NpdGlvbiA9ICJib3R0b20iLCBsZWdlbmQuZGlyZWN0aW9uID0gImhvcml6b250YWwiLCBsZWdlbmQuYm94ID0gInZlcnRpY2FsIiwgcGxvdC5tYXJnaW4gPSB1bml0KGMoMSwzLDEsMyksICJsaW5lcyIpLCB0ZXh0PWVsZW1lbnRfdGV4dChzaXplPTE2LCBmYW1pbHk9IkFyaWFsIikpICsKICAjI2FkZCB0aGVzZSB0byBhYm92ZSB0byByZW1vdmUgeSA9IHBsb3QudGl0bGUgPSBlbGVtZW50X2JsYW5rKCksIGF4aXMudGV4dC55ID0gZWxlbWVudF9ibGFuaygpLCBheGlzLnRpY2tzLnkgPSBlbGVtZW50X2JsYW5rKCksIGF4aXMudGl0bGUueSA9IGVsZW1lbnRfYmxhbmsoKQogICMjIGNoYW5nZSB0aGUgY29sb3VycwogIHNjYWxlX2NvbG91cl92aXJpZGlzKG9wdGlvbiA9ICJpbmZlcm5vIiwgZ3VpZGUgPSAiY29sb3VyYmFyIiwgbmEudmFsdWU9IndoaXRlIiwgYmVnaW4gPSAwLCBlbmQgPSAxLCBkaXJlY3Rpb24gPSAxKSArCiAgIyMgY2hhbmdlIHggYXhpcyBsYWJlbAogIGxhYnMoeCA9ICJHZW5lIiwgIHRpdGxlID0gIiIsIHkgPSAiQ2x1c3RlciIpICsKICAjIyBhbm5vdGF0ZSBtYWxlcwogIGdlb21faGxpbmUoYWVzKHlpbnRlcmNlcHQgPSAyOC41KSkgKwogICMjIGFubm90YXRlIGZlbWFsZXMKICBnZW9tX2hsaW5lKGFlcyh5aW50ZXJjZXB0ID0gMjQuNSkpICsKICAjIyBhbm5vdGF0ZSBoZXJtYXBocm9kaXRlCiAgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IDIzLjUpKSAgKwogICMjIGNoYW5nZSBsYWJlbCBvbiBib3R0b20gb2YgcGxvdCBzbyB3ZSBjYW4gaW5kaWNhdGUgbWFya2VycwogICBzY2FsZV94X2Rpc2NyZXRlKGxhYmVscyA9IHJldigoYyhleHByZXNzaW9uKHBhc3RlKGl0YWxpYygiZmQ1IikpKSwKICAgIGV4cHJlc3Npb24ocGFzdGUoaXRhbGljKCJmZDQiKSkpLAogICAgZXhwcmVzc2lvbihwYXN0ZShpdGFsaWMoImZkMyIpKSksCiAgICBleHByZXNzaW9uKHBhc3RlKGl0YWxpYygiZmQyIikpKSwKICAgIGV4cHJlc3Npb24ocGFzdGUoaXRhbGljKCJmZDEiKSkpLAogICAgZXhwcmVzc2lvbihwYXN0ZShpdGFsaWMoImdkMSIpKSksCiAgICBleHByZXNzaW9uKHBhc3RlKGl0YWxpYygibWQ1IikpKSwKICAgIGV4cHJlc3Npb24ocGFzdGUoaXRhbGljKCJtZDQiKSkpLAogICAgZXhwcmVzc2lvbihwYXN0ZShpdGFsaWMoIm1kMyIpKSksCiAgICBleHByZXNzaW9uKHBhc3RlKGl0YWxpYygibWQyIikpKSwKICAgIGV4cHJlc3Npb24ocGFzdGUoaXRhbGljKCJtZDEiKSkpLAogICAgZXhwcmVzc2lvbihwYXN0ZShpdGFsaWMoImFwMi1nIikpKSwKICAgIGV4cHJlc3Npb24ocGFzdGUoaXRhbGljKCJkaGMsIHB1dGF0aXZlIiksICIobWFsZSkiKSksCiAgICBleHByZXNzaW9uKHBhc3RlKGl0YWxpYygiY2NwMSIpLCAiKGZlbWFsZSkiKSksCiAgICBleHByZXNzaW9uKHBhc3RlKGl0YWxpYygiYW1hMSIpLCAiKHNjaGl6b250KSIpKSwKICAgIGV4cHJlc3Npb24ocGFzdGUoaXRhbGljKCJtc3A5IiksICIodHJvcGgpIikpLAogICAgZXhwcmVzc2lvbihwYXN0ZShpdGFsaWMoIm1haHJwMWIiKSwgIihyaW5nKSIpKSkpKSkKCiMjIHZpZXcKcHJpbnQoZG90X3Bsb3RfcGFwZXJfZmlndXJlKQpgYGAKCnNhdmUKYGBge3J9Cmdnc2F2ZSgiLi4vaW1hZ2VzX3RvX2V4cG9ydC9tZXJnZV9kb3RfcGxvdC5wbmciLCBwbG90ID0gZG90X3Bsb3RfcGFwZXJfZmlndXJlLCBkZXZpY2UgPSAicG5nIiwgcGF0aCA9IE5VTEwsIHNjYWxlID0gMSwgd2lkdGggPSAzMCwgaGVpZ2h0ID0gMzUsIHVuaXRzID0gImNtIiwgZHBpID0gMzAwLCBsaW1pdHNpemUgPSBUUlVFKQpgYGAKCiMgOC4gU3Vic2V0IHNleHVhbCBjZWxscyB7LnRhYnNldH0KCk1ha2UgYSBzdWJzZXR0ZWQgU2V1cmF0IG9iamVjdCBvZiBzZXh1YWwgY2VsbHMuIAoKSW5jbHVkZSB0aGUgcHJlLWJyYW5jaCB0b28gYXMgd2VsbCBhcyBhbnkgd2VpcmQgY2x1c3RlcnMgdGhhdCBtYXkgaGF2ZSBjbHVzdGVyZWQgb3V0LiAKCml0J3MgYmVlbiBhIHdoaWxlIHNpbmNlIHdlIGxvb2tlZCBhdCB0aGUgY2x1c3RlcnMgc28gbGV0J3MgY2hlY2sgdGhlbSBvdXQgYWdhaW46CmBgYHtyLCBmaWcuaGVpZ2h0ID0gNCwgZmlnLndpZHRoID0gNH0KIyMgUGxvdApEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQsIGxhYmVsID0gVFJVRSwgcmVwZWwgPSBUUlVFLCBwdC5zaXplID0gMC4wNSwgZ3JvdXAuYnkgPSAic2V1cmF0X2NsdXN0ZXJzIiwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKyBjb29yZF9maXhlZCgpCmBgYAoKIyMjIERlZmluZSBjZWxscyBhbmQgc3Vic2V0CmBgYHtyfQojIyBkZWZpbmUgY2VsbHMKIyMgMiBhbmQgMCBhcmUgYXQgdGhlIGJlZ2lubmluZyBvZiB0aGUgc3RhbGsKc2V4X2NsdXN0ZXJzIDwtIGMoYmlwb3RlbnRpYWxfY2x1c3RlcnMsIGZlbWFsZV9jbHVzdGVycywgbWFsZV9jbHVzdGVycywgIjAiLCAiMyIpCgojIyBzdWJzZXQgY2VsbHMgaW50byBuZXcgb2JqZWN0CnRlbngubXV0YW50LmludGVncmF0ZWQuc2V4IDwtIHN1YnNldCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBpZGVudHMgPSBzZXhfY2x1c3RlcnMpCmBgYAoKIyMjIGluc3BlY3QvY2hlY2sKYGBge3J9CiMjIGluc3BlY3Qgb2JqZWN0CnRlbngubXV0YW50LmludGVncmF0ZWQuc2V4CgojIyBsb29rIGF0IG9yaWdpbmFsIFVNQVAKRGltUGxvdCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleCwgbGFiZWwgPSBUUlVFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIHNwbGl0LmJ5ID0gImV4cGVyaW1lbnQiLCBkaW1zID0gYygyLDEpLCByZWR1Y3Rpb24gPSAiRElNX1VNQVAiKSArIGNvb3JkX2ZpeGVkKCkKYGBgCgojIyMjIFJlbW92ZSBjb250YW1pbmFudCBhc2V4dWFsIGNlbGxzCgp3ZSB3YW50IHRvIHJlbW92ZToKYGBge3J9CiMjIGxvb2sgYXQgb3JpZ2luYWwgVU1BUApEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQuc2V4LCBsYWJlbCA9IFRSVUUsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDAuMSwgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKyBjb29yZF9maXhlZCgpICsgZ2VvbV9obGluZShhZXMoeWludGVyY2VwdCA9IC0xLjIsIGFscGhhID0gNSkpICsgZ2VvbV92bGluZShhZXMoeGludGVyY2VwdCA9IDAuMSwgYWxwaGEgPSA1KSkKYGBgCgpgYGB7cn0KIyMgZXh0cmFjdCBjZWxsIGVtYmVkZGluZ3MKZGZfc2V4X2NlbGxfZW1iZWRkaW5ncyA8LSBhcy5kYXRhLmZyYW1lKHRlbngubXV0YW50LmludGVncmF0ZWQuc2V4QHJlZHVjdGlvbnNbWyJESU1fVU1BUCJdXUBjZWxsLmVtYmVkZGluZ3MpCgojIyBzdWJzZXQgYW55dGhpbmcgbG93ZXIgdGhhbiAtMC43NSBpbiBVTUFQIDIgYW5kIC03IGluIFVNQVAgMQpyZW1vdmVfY2VsbHMgPC0gcm93Lm5hbWVzKGRmX3NleF9jZWxsX2VtYmVkZGluZ3Nbd2hpY2goZGZfc2V4X2NlbGxfZW1iZWRkaW5ncyRESU1VTUFQXzIgPCAwLjEgJiBkZl9zZXhfY2VsbF9lbWJlZGRpbmdzJERJTVVNQVBfMSA+IC0xLjIpLCBdKQoKIyMgcGxvdCB0aGVzZSBjZWxscwpEaW1QbG90KHRlbngubXV0YW50LmludGVncmF0ZWQuc2V4LCBsYWJlbCA9IEZBTFNFLCByZXBlbCA9IFRSVUUsIHB0LnNpemUgPSAwLjEsIGNlbGxzLmhpZ2hsaWdodCA9IHJlbW92ZV9jZWxscywgZGltcyA9IGMoMiwxKSwgcmVkdWN0aW9uID0gIkRJTV9VTUFQIikgKyAKICBjb29yZF9maXhlZCgpICsgCiAgc2NhbGVfY29sb3JfbWFudWFsKHZhbHVlcz1jKCIjMDAwMDAwIiwgIiNmNTRlMWUiKSkgKyAKICB0aGVtZV92b2lkKCkgKyAKICAjbGFicyh0aXRsZSA9IHBhc3RlKCIoTXV0YW50IG9vbSkiLCJcbiIsICJQQkFOS0FfMTMwMjcwMCIpKSArIAogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUpLCBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCmBgYAoKYGBge3J9CkRpbVBsb3QodGVueC5tdXRhbnQuaW50ZWdyYXRlZC5zZXgsIGxhYmVsID0gRkFMU0UsIHJlcGVsID0gVFJVRSwgcHQuc2l6ZSA9IDEsIGRpbXMgPSBjKDIsMSksIHJlZHVjdGlvbiA9ICJESU1fVU1BUCIsIGdyb3VwLmJ5ID0gImlkZW50aXR5X2NvbWJpbmVkIikgKyAKICBjb29yZF9maXhlZCgpIApgYGAKCgp0aGVuIGNoZWNrIHdoYXQgdGhlIElEcyBvZiB0aGVzZSBjZWxscyBhcmUgdG8gZW5zdXJlIHRoZXkgYXJlbid0IGEgZ2VudWluZSBtdXRhbnQgc2lnbmF0dXJlCmBgYHtyfQp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleEBtZXRhLmRhdGFbcm93bmFtZXModGVueC5tdXRhbnQuaW50ZWdyYXRlZC5zZXhAbWV0YS5kYXRhKSAlaW4lIHJlbW92ZV9jZWxscywgXSRpZGVudGl0eV9jb21iaW5lZApgYGAKCkFsdGhvdWdoIHRoZXJlIGFyZSBhIG51bWJlciBvZiBHQ1NLTy0yMSBjZWxscywgdGhlcmUgYXJlIHN0aWxsIG1hbnkgcmVtYWluaW5nIGluIHRoZSBzZXggY2x1c3RlciBhYm92ZSBhbmQgdGhlIGNlbGxzIG5lYXIgdGhlIGFzZXh1YWwgY3ljbGUgYWxzbyBoYXZlIGEgR0NTS08tMTcgY2VsbCB3aXRoIHRoZW0gYW5kIGFyZSB0aGVyZWZvcmUgbm90IGV4Y2x1c2l2ZWx5IGJlbG9uZ2luZyB0byB0aGF0IG11dGFudCBzbyB3ZSB3aWxsIHJlbW92ZSB0aGVzZSBjZWxscy4gCgojIyBGaW5hbCBTdWJzZXQKYGBge3J9CiMjIG1ha2Uga2VlcCBjZWxscyBmcm9tIHRoZSByZW1vdmVfY2VsbHMKIyMgbWFrZSB0aGUgbm90IGluIGZ1bmN0aW9uCiclbmklJyA8LSBOZWdhdGUoJyVpbiUnKQprZWVwX2NlbGxzIDwtIGNvbG5hbWVzKHRlbngubXV0YW50LmludGVncmF0ZWQuc2V4KVt3aGljaChjb2xuYW1lcyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleCkgJW5pJSByZW1vdmVfY2VsbHMpXQoKIyMgc3Vic2V0CnRlbngubXV0YW50LmludGVncmF0ZWQuc2V4IDwtIHN1YnNldCh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleCwgY2VsbHMgPSBrZWVwX2NlbGxzKQoKIyMgaW5zcGVjdAp0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleApgYGAKCmNvcHkgb2xkIGNsdXN0ZXJzIG92ZXIKYGBge3J9CiMjIGNvcHkgb2xkIGNsdXN0ZXJzCnRlbngubXV0YW50LmludGVncmF0ZWQuc2V4IDwtIEFkZE1ldGFEYXRhKHRlbngubXV0YW50LmludGVncmF0ZWQuc2V4LCB0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleEBtZXRhLmRhdGEkc2V1cmF0X2NsdXN0ZXJzLCBjb2wubmFtZSA9ICJwb3N0X2ludGVncmF0aW9uX2NsdXN0ZXJzIikKYGBgCgojIDkuIFNhdmUgYW5kIEV4cG9ydCB7LnRhYnNldH0KClNhdmUgZW52aXJvbm1lbnQKYGBge3J9CiMjIFRoaXMgc2F2ZXMgZXZlcnl0aGluZyBpbiB0aGUgZ2xvYmFsIGVudmlyb25tZW50IGZvciBlYXN5IHJlY2FsbCBsYXRlcgojc2F2ZS5pbWFnZShmaWxlID0gIkdDU0tPX21lcmdlLlJEYXRhIikKI2xvYWQoZmlsZSA9ICJHQ1NLT19tZXJnZS5SRGF0YSIpCmBgYAoKU2F2ZSBvYmplY3QocykKYGBge3J9CiMjIFNhdmUgYW4gb2JqZWN0IHRvIGEgZmlsZQpzYXZlUkRTKHRlbngubXV0YW50LmludGVncmF0ZWQuc2V4LCBmaWxlID0gIi4uL3RlbngubXV0YW50LmludGVncmF0ZWQuc2V4LlJEUyIpCiMjIFJlc3RvcmUgdGhlIG9iamVjdAojcmVhZFJEUyhmaWxlID0gIi4uL2RhdGFfdG9fZXhwb3J0L3RlbngubXV0YW50LmludGVncmF0ZWQuc2V4LlJEUyIpCgojIyBzYXZlIGludGVncmF0ZWQgb2JqZWN0IHRvIGZpbGUKc2F2ZVJEUyh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLCBmaWxlID0gIi4uL2RhdGFfdG9fZXhwb3J0L3RlbngubXV0YW50LmludGVncmF0ZWQuUkRTIikgCiMjIHJlc3RvcmUgdGhlIG9iamVjdAojdGVueC5tdXRhbnQuaW50ZWdyYXRlZCA8LSByZWFkUkRTKCIuLi9kYXRhX3RvX2V4cG9ydC90ZW54Lm11dGFudC5pbnRlZ3JhdGVkLlJEUyIpCmBgYAoKIyBBcHBlbmRpeCB7LnRhYnNldH0KCiMjIFNlc3Npb24gSW5mbyAKYGBge3IsIGVjaG8gPSBGQUxTRX0Kc2Vzc2lvbkluZm8oKQpgYGAKCiMjIEV4dHJhcwoKIyMjIFBhcnQgMiBleHBvcnQgZGF0YSBmcmFtZXMgZm9yIEFydGh1cgoKLS0gU3Vic2V0IG9ubHkgMTBYIGNlbGxzCgotLSBjbHVzdGVyIDI0IGlzIHByZWRldGVybWluYXRpb24gY2VsbHMKLS0gY2x1c3RlciAyOSBpcyBwb3N0IGNlbGxzCi0tIGNsdXN0ZXIgMzYgaXMgcG9zdCBjZWxscwpgYGB7cn0KIyMgU3Vic2V0IDEwWCBEYXRhc2V0LCBjbHVzdGVyIDI0CiMjIGV4dHJhY3Qgb25seSBjZWxscyBpbiBjbHVzdGVyIDI0CnNldXJhdC5vYmplY3Quc3Vic2V0IDwtIFN1YnNldERhdGEodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgc3Vic2V0Lm5hbWUgPSAic2V1cmF0X2NsdXN0ZXJzIiwgYWNjZXB0LnZhbHVlID0gYygiMjQiKSkKIyMgZ2V0IHRoZSBuYW1lcyBvZiB0aGUgY2VsbHMgaW4gY2x1c3RlciBvZiBpbnRlcmVzdApuYW1lc19vZl9jZWxsc19pbl9jbHVzdGVyXzI0IDwtIGNvbG5hbWVzKHNldXJhdC5vYmplY3Quc3Vic2V0QGFzc2F5cyRSTkFAY291bnRzKQojIyBzdWJzZXQgc2V1cmF0CnRlbnhfY2x1c3Rlcl8yNCA8LSBTdWJzZXREYXRhKHBiX3NleF9maWx0ZXJlZCwgY2VsbHMgPSBuYW1lc19vZl9jZWxsc19pbl9jbHVzdGVyXzI0KQojIyBleHRyYWN0IGRhdGEKdGVueF9jbHVzdGVyXzI0X21hdHJpeF9kYXRhIDwtIGFzKGFzLm1hdHJpeChHZXRBc3NheURhdGEodGVueF9jbHVzdGVyXzI0LCBhc3NheSA9ICJSTkEiLCBzbG90ID0gImRhdGEiKSksICdzcGFyc2VNYXRyaXgnKQojIyBleHRyYWN0IGNvdW50cwp0ZW54X2NsdXN0ZXJfMjRfbWF0cml4X2NvdW50cyA8LSBhcyhhcy5tYXRyaXgoR2V0QXNzYXlEYXRhKHRlbnhfY2x1c3Rlcl8yNCwgYXNzYXkgPSAiUk5BIiwgc2xvdCA9ICJjb3VudHMiKSksICdzcGFyc2VNYXRyaXgnKQojIyBleHRyYWN0IG1ldGEgZGF0YQojIyBtYWtlIGJpZyBtZXRhIGRhdGEgZGF0YWZyYW1lCm1ldGFfZGYgPC0gZGF0YS5mcmFtZSh0ZW54Lm11dGFudC5pbnRlZ3JhdGVkLnNleEBtZXRhLmRhdGEpCiNtZXRhX2RmIDwtIGRhdGEuZnJhbWUodGVueC5tdXRhbnQuaW50ZWdyYXRlZEBtZXRhLmRhdGEpCnRlbnhfY2x1c3Rlcl8yNF9wZCA8LSBtZXRhX2RmW3doaWNoKHJvd25hbWVzKG1ldGFfZGYpICVpbiUgY29sbmFtZXModGVueF9jbHVzdGVyXzI0X21hdHJpeF9jb3VudHMpKSwgXQojIHNhdmUgYWxsIDMgZmlsZXMKI3dyaXRlLmNzdih0ZW54X2NsdXN0ZXJfMjRfbWF0cml4X2RhdGEsIGZpbGUgPSAifi9kYXRhX3RvX2V4cG9ydC90ZW54X2NsdXN0ZXJfMjRfbWF0cml4X2RhdGEuY3N2IikKI3dyaXRlLmNzdih0ZW54X2NsdXN0ZXJfMjRfbWF0cml4X2NvdW50cywgZmlsZSA9ICJ+L2RhdGFfdG9fZXhwb3J0L3RlbnhfY2x1c3Rlcl8yNF9tYXRyaXhfY291bnRzLmNzdiIpCndyaXRlLmNzdih0ZW54X2NsdXN0ZXJfMjRfcGQsIGZpbGUgPSAifi9kYXRhX3RvX2V4cG9ydC90ZW54X2NsdXN0ZXJfMjRfcGQuY3N2IikKCiMjIFN1YnNldCAxMFggRGF0YXNldCwgY2x1c3RlciAyOQojIGV4dHJhY3Qgb25seSBjZWxscyBpbiBjbHVzdGVyIDI5CnNldXJhdC5vYmplY3Quc3Vic2V0IDwtIFN1YnNldERhdGEodGVueC5tdXRhbnQuaW50ZWdyYXRlZCwgc3Vic2V0Lm5hbWUgPSAic2V1cmF0X2NsdXN0ZXJzIiwgYWNjZXB0LnZhbHVlID0gYygiMjkiKSkKI2dldCB0aGUgbmFtZXMgb2YgdGhlIGNlbGxzIGluIGNsdXN0ZXIgb2YgaW50ZXJlc3QKbmFtZXNfb2ZfY2VsbHNfaW5fY2x1c3Rlcl8yOSA8LSBjb2xuYW1lcyhzZXVyYXQub2JqZWN0LnN1YnNldEBhc3NheXMkUk5BQGNvdW50cykKIyBzdWJzZXQgc2V1cmF0CnRlbnhfY2x1c3Rlcl8yOSA8LSBTdWJzZXREYXRhKHBiX3NleF9maWx0ZXJlZCwgY2VsbHMgPSBuYW1lc19vZl9jZWxsc19pbl9jbHVzdGVyXzI5KQojIGV4dHJhY3QgZGF0YQp0ZW54X2NsdXN0ZXJfMjlfbWF0cml4X2RhdGEgPC0gYXMoYXMubWF0cml4KEdldEFzc2F5RGF0YSh0ZW54X2NsdXN0ZXJfMjksIGFzc2F5ID0gIlJOQSIsIHNsb3QgPSAiZGF0YSIpKSwgJ3NwYXJzZU1hdHJpeCcpCiMgZXh0cmFjdCBjb3VudHMKdGVueF9jbHVzdGVyXzI5X21hdHJpeF9jb3VudHMgPC0gYXMoYXMubWF0cml4KEdldEFzc2F5RGF0YSh0ZW54X2NsdXN0ZXJfMjksIGFzc2F5ID0gIlJOQSIsIHNsb3QgPSAiY291bnRzIikpLCAnc3BhcnNlTWF0cml4JykKIyBleHRyYWN0IG1ldGEgZGF0YQp0ZW54X2NsdXN0ZXJfMjlfcGQgPC0gbWV0YV9kZlt3aGljaChyb3duYW1lcyhtZXRhX2RmKSAlaW4lIGNvbG5hbWVzKHRlbnhfY2x1c3Rlcl8yOV9tYXRyaXhfY291bnRzKSksIF0KIyBzYXZlIGFsbCAzIGZpbGVzCiN3cml0ZS5jc3YodGVueF9jbHVzdGVyXzI5X21hdHJpeF9kYXRhLCBmaWxlID0gIn4vZGF0YV90b19leHBvcnQvdGVueF9jbHVzdGVyXzI5X21hdHJpeF9kYXRhLmNzdiIpCiN3cml0ZS5jc3YodGVueF9jbHVzdGVyXzI5X21hdHJpeF9jb3VudHMsIGZpbGUgPSAifi9kYXRhX3RvX2V4cG9ydC90ZW54X2NsdXN0ZXJfMjlfbWF0cml4X2NvdW50cy5jc3YiKQp3cml0ZS5jc3YodGVueF9jbHVzdGVyXzI5X3BkLCBmaWxlID0gIn4vZGF0YV90b19leHBvcnQvdGVueF9jbHVzdGVyXzI5X3BkLmNzdiIpCgojIyBTdWJzZXQgMTBYIERhdGFzZXQsIGNsdXN0ZXIgMzYKIyBleHRyYWN0IG9ubHkgY2VsbHMgaW4gY2x1c3RlciAzNgpzZXVyYXQub2JqZWN0LnN1YnNldCA8LSBTdWJzZXREYXRhKHRlbngubXV0YW50LmludGVncmF0ZWQsIHN1YnNldC5uYW1lID0gInNldXJhdF9jbHVzdGVycyIsIGFjY2VwdC52YWx1ZSA9IGMoIjM2IikpCiNnZXQgdGhlIG5hbWVzIG9mIHRoZSBjZWxscyBpbiBjbHVzdGVyIG9mIGludGVyZXN0Cm5hbWVzX29mX2NlbGxzX2luX2NsdXN0ZXJfMzYgPC0gY29sbmFtZXMoc2V1cmF0Lm9iamVjdC5zdWJzZXRAYXNzYXlzJFJOQUBjb3VudHMpCiMgc3Vic2V0IHNldXJhdAp0ZW54X2NsdXN0ZXJfMzYgPC0gU3Vic2V0RGF0YShwYl9zZXhfZmlsdGVyZWQsIGNlbGxzID0gbmFtZXNfb2ZfY2VsbHNfaW5fY2x1c3Rlcl8zNikKIyBleHRyYWN0IGRhdGEKdGVueF9jbHVzdGVyXzM2X21hdHJpeF9kYXRhIDwtIGFzKGFzLm1hdHJpeChHZXRBc3NheURhdGEodGVueF9jbHVzdGVyXzM2LCBhc3NheSA9ICJSTkEiLCBzbG90ID0gImRhdGEiKSksICdzcGFyc2VNYXRyaXgnKQojIGV4dHJhY3QgY291bnRzCnRlbnhfY2x1c3Rlcl8zNl9tYXRyaXhfY291bnRzIDwtIGFzKGFzLm1hdHJpeChHZXRBc3NheURhdGEodGVueF9jbHVzdGVyXzM2LCBhc3NheSA9ICJSTkEiLCBzbG90ID0gImNvdW50cyIpKSwgJ3NwYXJzZU1hdHJpeCcpCiMgZXh0cmFjdCBtZXRhIGRhdGEKdGVueF9jbHVzdGVyXzM2X3BkIDwtIG1ldGFfZGZbd2hpY2gocm93bmFtZXMobWV0YV9kZikgJWluJSBjb2xuYW1lcyh0ZW54X2NsdXN0ZXJfMzZfbWF0cml4X2NvdW50cykpLCBdCiMgc2F2ZSBhbGwgMyBmaWxlcwojd3JpdGUuY3N2KHRlbnhfY2x1c3Rlcl8zNl9tYXRyaXhfZGF0YSwgZmlsZSA9ICJ+L2RhdGFfdG9fZXhwb3J0L3RlbnhfY2x1c3Rlcl8zNl9tYXRyaXhfZGF0YS5jc3YiKQojd3JpdGUuY3N2KHRlbnhfY2x1c3Rlcl8zNl9tYXRyaXhfY291bnRzLCBmaWxlID0gIn4vZGF0YV90b19leHBvcnQvdGVueF9jbHVzdGVyXzM2X21hdHJpeF9jb3VudHMuY3N2IikKd3JpdGUuY3N2KHRlbnhfY2x1c3Rlcl8zNl9wZCwgZmlsZSA9ICJ+L2RhdGFfdG9fZXhwb3J0L3RlbnhfY2x1c3Rlcl8zNl9wZC5jc3YiKQpgYGAK